Session log from SM35-not fully displayed
Dear Freinds,
My requirement is to read the log of SM35, that is my intenstion is after my report being executed (BDC session method ) the session get processed in background only as i have used rsbdcsub .
Now i want to display the log which find in the SM35 for processed session i have tried below in my program
i.e after running the session I should read log and store for which legacy numbers SAP customer is created and for which its failed.
As specified in one of the logs in the SDN i have written as below.
Get your TEMSEID MANDANT from APQL table, and call these four function modules in sequence.
DATA: CHARCP LIKE RSTSTYPE-CHARCO VALUE '0000'.
CALL FUNCTION 'RSTS_GET_ATTRIBUTES'
EXPORTING
AUTHORITY = ' '
CLIENT = APQL-MANDANT
NAME = APQL-TEMSEID
IMPORTING
CHARCO = CHARCP
EXCEPTIONS
FB_ERROR = 1
FB_RSTS_OTHER = 2
NO_OBJECT = 3
NO_PERMISSION = 4
OTHERS = 5.
CALL FUNCTION 'RSTS_OPEN_RLC'
EXPORTING
NAME = APQL-TEMSEID
CLIENT = APQL-MANDANT
AUTHORITY = 'BATCH'
PROM = 'I'
RECTYP = 'VNL----'
CHARCO = CHARCP
EXCEPTIONS
FB_CALL_HANDLE = 4
FB_ERROR = 8
FB_RSTS_NOCONV = 12
FB_RSTS_OTHER = 16
NO_OBJECT = 20
OTHERS = 24.
IF SY-SUBRC > 0.
EXIT.
ENDIF.
CALL FUNCTION 'RSTS_READ'
TABLES
DATATAB = LOG_TABLE
EXCEPTIONS
FB_CALL_HANDLE = 4
FB_ERROR = 8
FB_RSTS_NOCONV = 12
FB_RSTS_OTHER = 16
OTHERS = 16.
IF SY-SUBRC > 0.
EXIT.
ENDIF.
CALL FUNCTION 'RSTS_CLOSE'
EXCEPTIONS
OTHERS = 4.
LOG_TABLE is having only the below
ENTERDATE LIKE BTCTLE-ENTERDATE,
ENTERTIME LIKE BTCTLE-ENTERTIME,
LOGMESSAGE(400) TYPE C,
In t´he log message I am not getting any exact message displayed in SM35 log . Please suggest me what i have to do
regards
divya
better use:
CALL TRANSACTION tcode USING bdcdata MODE mod MESSAGES INTO itab.
and analyse sy-subrc and itab for every customer
A.
Similar Messages
-
How to get the job logs from sm35 by using the queue id and session name?
hi all,
can any one please let me know how to read the job log from sm35 by using the session name and queue id. i have the job name and job count but is it possible to download the job log by using the queue id and session name.
FYI..
i want to read this job log and i want to send it to an email id.
-> i am using the job_open and submitting the zreport via job name and job count and then i am using the function module job_close.
but this is not working in my scenario i have the queue id and session name by using this two i want to get the job log is there any function module available or code please provide me some inputs.
thanks in advance,
koushikHi Bharath,
If you want to download it to the local file then you can follow the instructions in the below link.
How to download Batch Input Session Log?
Regards,
Sachin -
It was pointed out that my links do not function correctly on Firefox on a Windows platform. When links are clicked, they do not fully display the NEW page until the mouse is moved! I have now observed it for myself on my fathers PC running Windows XP on Firefox.My PC is on Windows7
It is the 5 version of Firefox, so I know it is a current bug, and appears in no other browsers that I know of.Start Firefox in <u>[[Safe Mode]]</u> to check if one of the extensions is causing the problem (switch to the DEFAULT theme: Firefox (Tools) > Add-ons > Appearance/Themes).
* Don't make any changes on the Safe mode start window.
* https://support.mozilla.com/kb/Safe+Mode
If it does work in Safe-mode then disable all extensions and then try to find which is causing it by enabling one at a time until the problem reappears.
* Use "Disable all add-ons" on the [[Safe mode]] start window to disable all extensions.
* Close and restart Firefox after each change via "File > Exit" (Mac: "Firefox > Quit"; Linux: "File > Quit")
In Firefox 4+ you can use one of these to start in <u>[[Safe mode]]</u>:
* Help > Restart with Add-ons Disabled
* Hold down the Shift key while double clicking the Firefox desktop shortcut (Windows)
* https://support.mozilla.com/kb/Troubleshooting+extensions+and+themes -
External Email address in process chain alerting not fully displayed
Friends,
I have this weird problem and not sure if its a real issue.
I am maintaining messages for process chain failure alerting. I am using an external address and receipant type as "via Internet".
When I enter email id (ex: abc.123.xyz at mycompany.xxx) save it and come back, and If I re enter that screen the entered email is not fully displayed, few chars are truncated, (ex : abc.123.xyz@mycompan).
Can you guys please help me figure out what the issue is?
Is there any restriction on the length?
Thanks
vijayplease dont bother...
-
ERROR SESSIONS DOWNLOAD FROM SM35
Hi Guru's,
I want to down load error sessions from SM35 on desktop for user friendly, But i am trying to search in SCN but i am not getting exact one,
So please help me with peace of worthfull code.
Best Regards,
Arjun.try to do manually use following tables and and get the error log and download it....
APQI------->Queue info definition
APQD----->n DATA DEFINITION Queue............
in APQI table u will get the log field VARDATA....... -
SC history update problem:PO from PR not getting displayed in SC history
Hi
We are on EBP 3.5,Classic scenario.
PR's get created in R/3 backend and then are manually converted into PO.This entire cycle is shown in EBP SC history tab.However for some of the SC's we are seeing status only up to PR stage(PO no. is not getting displayed either in BBP_PD or check status txn).When we try manual status updation thru BBP_GET_STATUS_2,it throws an error saying,"these references neither GUID nor destination,thus could not be assigned to any system not even local system".
Has anyone faced such an issue.Pl reply
Regards
SanjeevHi
<u>I am not sure, is it happening for Catalog Item, free text item, or limit item in your case.</u>
<b>Have you tried executing report CLEAN_REQREQ_UP ? What all errors appear in RZ20 Transaction, when this dump happens. ? </b>
<u>Please have a look at the following OSS Notes, which deals with the same symptoms, you told in your response.</u>
<b>Note 1005373 - BBPSC04: Purchase order details missing in history for STO
Note 728894 - Creation date of the PReq in the history
Note 989891 - BBP_GET_STATUS_2: Incorr quantity determination in back end
Note 1023706 - Follow-on Documents Show Wrong Net-Price and Net-Value.
Note 886099 - History: Short dump during the product conversion
Note 925480 - Short dump in history of a purchase order
Note 1006898 - Deleted vendor not displayed in Change hist of Shopping cart
Note 994379 - History page:wrong exchange rate is used
Note 725920 - Incorrect display in follow-on docs of limit shopping carts
Note 953238 - Shopping cart history in the sourcing cockpit
Note 949162 - Follow-on documents exist, status I1111 and I1113 active
Note 890859 - Status/shopping cart/error message without text
Note 927585 - GI slip and cancellation are missing in the history
Note 730239 - Check status: Missing Backend reference
Note 625121 - PO Ack not displayed in Check Status
Note 758522 - Check Status: Follow-on documents in the list and history
Note 532709 - Shop with Limit: Backend PO after requisition is not found
Note 515475 - EBP/BBP Status BE Requis.: Probl. with Limit / UoM
Note 555183 - EBP 3.0: Not all references found after 550783
Note 957957 - BBPIV03:doesn't find POs when deliv.date is set
Note 787786 - Archived PReq and reservations are missing in history
Note 812564 - The ordered quantity of the BE-PO is not read
Note 943679 - Termination or incorrect conversion after Note 812564</b>
Hope this will help.
Please reward suitable points, incase it suits your requirements.
Regards
- Atul -
IWork apps not fully displaying content in remote desktop session
Hi,
I have a 2.26 GHz Mac Mini running Snow Leopard, and I'm using my 12" G4 PowerBook to remotely connect to the Mini using JollysFastVNC. Generally this setup has worked very well, but I just realized that when remotely connecting to the Mini, the right-side display of iWork apps doesn't appear at all. In Numbers, if I open a new document based on a template in the Template Chooser, the "sheets" data on the left side appears properly, but the large area where the actual sheet data should appear is just solid white. I've encountered similar situations for Keynote (the Theme Chooser display is just a solid dark gray), and in Pages (just a white screen, if I type characters, the status info indicates that the characters are being recognized and entered, but nothing appears on the screen). I've tested this with both JollysFastVNC as well as Chicken of the VNC, and I have the same problems with either client, which is making me think that there's something unique about the way that the iWork apps update their main displays that "flies under the radar" of Snow Leopard's VNC server, keeping it from thinking that these parts of the app displays have been updated and thus need to be communicated to the VNC client apps. I'm wondering if anyone else has encountered this, and if so, if there's a know fix or workaround.
Thanks,
Kenhello FUBAR-BDHR, that may well be an issue with hardware acceleration - please try to disable hardware acceleration in the firefox ''menu ≡ > options > advanced > general'' (that setting will take a restart of the browser to take effect) & see if the situation changes...
-
Hi ,
I have a requirement to provide the list of inforecord that went to error in SM35.
Is there any standard program that could provide the log contents?
I found few standard programs but that are giving me screen data for all records even for the successfull records.
Any Ideas..
Thanks & Regards,
AnkurHi Ankur..
Program is there.
Program name is RSBDCLOG.
Below is the program's source code..
*@(#)RSBDCLOG %I% SAP %E%
SAP AG Walldorf
Systeme, Anwendungen und Produkte in der Datenverarbeitung
(C) Copyright SAP AG 1997
Projekt: R/3 BatchInput
Entwickl.-Stand: SAP , BIN-Datenbank
Source-Typ: Report
Autor: SAP
Entwicklungsstand:
30.04.97 first version with new protocol interface based on
previous RSBDCLOG (copied to RSBDCOLG and used if
parameter bdc/new_protocol = off)
REPORT RSBDCLOG MESSAGE-ID 00 LINE-SIZE 102
NO STANDARD PAGE HEADING.
Dieser Report dient zur Anzeige des Inhalts eines Batch-Input *
Protokolls. Batch Input Protokolle werden ab dieser Version *
als TemSe Files abgelegt. Die Zuordnung eines TemSe Files zu einem *
Batch Input Lauf erfolgt ueber die neue Tabelle APQL, die damit *
das Protokoll Verzeichnis realisiert. *
1. Die Tabelle BDCLD beschreibt die Struktur eines Verzeichnis- *
Eintrags und entspricht damit APQL. *
2. Die Tabelle BDCLM beschreibt einen Eintrag innerhalb eines *
TemSe Protkoll Files (M = Message). *
*-- Datendefinitionen zum Report ---*
TABLES: BDCMH, *BDCMH, "BatchInput Trans.Header
BDCTH, *BDCTH, "BatchInput Mess. Header
APQD, *APQD, "Queue Daten
APQI, *APQI, "Queue Info
APQL, "Protocol Directory Info
D0220, "Dynpro 220
D0300. "Dynpro 320
TABLES: SPOP. "infostruktur popup_to_confirm
DATA: BEGIN OF BIM, "Aktivitaeten Uebersicht
AONL(4) VALUE 'AONL', "Mappen-Abspielen im Online
ABTC(4) VALUE 'ABTC', "Mappen-Abspielen im Batch
FREE(4) VALUE 'FREE', "Freigeben einer Mappe
LOCK(4) VALUE 'LOCK', "Sperren und Entsperren von Mappen
DELE(4) VALUE 'DELE', "Loeschen von Mappen
ANAL(4) VALUE 'ANAL', "Analysieren von Mappen
END OF BIM.
DATA BEGIN OF BDCLDA OCCURS 0. " ITabelle der Verzeichniseintraege
INCLUDE STRUCTURE APQL. " LogTabelle
DATA END OF BDCLDA .
DATA: BEGIN OF ITRAN OCCURS 0,
CNT TYPE I, "zaehler
TRANS TYPE I, "transanktions#
QID LIKE APQI-QID , "qid
FRAGM(1) , "fragmented flag
END OF ITRAN.
DATA: ISTART TYPE I,
IENDE TYPE I,
ISTEP TYPE I,
IND TYPE I.
DATA: BEGIN OF BLOCK,
MARK TYPE I VALUE 0, "markierungsflag
SA LIKE SY-CPAGE, " block anfang
ZA LIKE SY-CUROW,
SE LIKE SY-CPAGE, " block ende
ZE LIKE SY-CUROW,
END OF BLOCK.
DATA: BEGIN OF MTAB OCCURS 0.
INCLUDE STRUCTURE APQI.
DATA: END OF MTAB.
DATA: BEGIN OF MY ,
MSGV1 LIKE SY-MSGV1,
MSGV2 LIKE SY-MSGV2,
MSGV3 LIKE SY-MSGV3,
MSGV4 LIKE SY-MSGV4,
END OF MY.
DATA: T-COUNT TYPE I.
DATA: "Hilfsfelder Zugriff Logfile
S_LOGNAME(80),
DECISION(01),
JA(01) VALUE 'J', "yeah
NEIN(01) VALUE 'N', "ni
EC TYPE I,
DEL_RETURN TYPE I,
NAMELN TYPE I,
TFOUND TYPE I,
TFCOUNT TYPE I,
DTRANCNT TYPE I VALUE 0,
PROTCNT TYPE I,
DCOUNT TYPE I,
MCOUNT TYPE I,
CHECKCNT TYPE I,
MAXLINE TYPE I VALUE 0,
WSTAT(04) TYPE C,
USE(1) TYPE C,
MODUS(1) TYPE C,
RUNLEVEL(1) TYPE C,
ZW-FNAME(80), "Hilfsfeld feldname
TMAPN(12) TYPE C, "hilfsfeld bdcld-GROUPID
BDCMHLEN TYPE I VALUE 20, "MessageHeader laenge 20 Bytes
BDCTHLEN TYPE I VALUE 6, "TransactionHeader laenge 6 Bytes
WHICHTRAN(3) TYPE C,
ULINE(80) VALUE "Unterstrich
TABIND LIKE SY-TABIX,
TABIND1 LIKE SY-TABIX,
PFSTATUS LIKE SY-PFKEY,
OLDSTATUS LIKE SY-PFKEY,
MOD_BILD TYPE I VALUE 0,
LOOP(1) VALUE 'L', "loop flag
TABW(1) VALUE 'T' , "loop flag
MSG_ART(1), "message art e=error w=warning s=
SEPCHAR(1), "seperator character def.
HBEGIN(1), "header beginn character Def.
COUNTX TYPE X, "header beginn character Def.
COUNTY TYPE I, "header beginn character Def.
EAFELD TYPE X VALUE '80', "header beginn character Def.
HLEN TYPE I VALUE 20, "header len
SAVE_CUROW0 LIKE SY-CUROW,
SAVE_CUROW1 LIKE SY-CUROW,
SAVE_CUROW2 LIKE SY-CUROW,
SAVE_CUROW3 LIKE SY-CUROW,
SAVE_CUROW4 LIKE SY-CUROW,
SAVE_CUROW5 LIKE SY-CUROW,
SAVE_CUROW6 LIKE SY-CUROW,
SAVE_CUROW7 LIKE SY-CUROW,
SAVE_CUROW8 LIKE SY-CUROW,
SAVE_LSIND LIKE SY-LSIND,
SAVE_LILLI1 LIKE SY-LILLI,
SAVE_LILLI2 LIKE SY-LILLI,
SAVE_PAGE1 LIKE SY-CPAGE,
SAVE_PAGE2 LIKE SY-CPAGE,
SAVE_PAGE8 LIKE SY-CPAGE,
SAVE_STARO LIKE SY-STARO,
SAVE_STACO LIKE SY-STACO,
SAVE_RC LIKE SY-SUBRC,
LINCT LIKE SY-LINCT,
LLINCT LIKE SY-LINCT,
E(1) VALUE 'E',
PARAMNAME(11) VALUE 'bdc/logfile',
frame1(14),
D0320-FCODE LIKE SY-UCOMM .
DATA:
Hilfsfeld zur Parameter-Uebergabe an Langtext-Anzeige eines
Job-Protokoll Eintrags
MSG_TEXT LIKE SHKONTEXT-MELDUNG,
MSG_ARBGB LIKE SHKONTEXT-MELD_ID,
MSG_NR LIKE SHKONTEXT-MELD_NR,
MSG_TITLE LIKE SHKONTEXT-TITEL.
DATA:
Hilfsfeld zur protokollfeststellung im zentralen directory
SHIFTLEN TYPE I VALUE 0,
PROTFLEN TYPE I VALUE 0,
PROTFOFF TYPE I VALUE 0,
RLEN TYPE I VALUE 0.
DATA: "Konstanten
APQD-MAXA TYPE I VALUE 100, " maximaler access auf apqd
AUTOR(05) TYPE C VALUE 'HARMS',
STANDALONE(01) TYPE C VALUE 'O',
DYNPRO(01) TYPE C VALUE 'D',
SUBMIT(01) TYPE C VALUE 'S'.
DATA: "zaehler
TFCNT TYPE I VALUE 0,
ON TYPE I VALUE 1,
OK TYPE I VALUE 1,
OFF TYPE I VALUE 0,
GUI_OBJ TYPE I VALUE 9,
HCOUNT TYPE I VALUE 0,
TCOUNT TYPE I VALUE 0,
TCOUNT1 TYPE I VALUE 0,
TCOUNT2 TYPE I VALUE 0,
WCOUNT TYPE I VALUE 0,
ZCOUNT TYPE I VALUE 0,
QCOUNT TYPE I VALUE 0.
DATA BEGIN OF LOG.
INCLUDE STRUCTURE RLOG.
DATA END OF LOG.
DATA:
BEGIN OF ZWD,
VDAT(8) TYPE C,
XDAT(1) TYPE C,
BDAT(8) TYPE C,
END OF ZWD.
DATA: "Hilfsfelder
VDAT TYPE D,
BDAT TYPE D.
DATA: "Eingabedatum fuer Ausgabedatum
BEGIN OF DATE,
JJJJ(4) TYPE N, "jahr
MM(2) TYPE N, "monat
TT(2) TYPE N, "tag
END OF DATE.
DATA: "Eingabedatum fuer Ausgabedatum
BEGIN OF DAT ,
TT(2) TYPE N, "tag
MM(2) TYPE N, "monat
JJJJ(4) TYPE N, "jahr
END OF DAT .
DATA: BEGIN OF DYH. "Dynpro Header
INCLUDE STRUCTURE D020S.
DATA: END OF DYH.
DATA: BEGIN OF DYF OCCURS 250. "Dynpro Felder
INCLUDE STRUCTURE D021S.
DATA: END OF DYF.
DATA: BEGIN OF DYA OCCURS 100. "Dynpro Ablauf-Logik
INCLUDE STRUCTURE D022S.
DATA: END OF DYA.
DATA: BEGIN OF DYM OCCURS 20. "Dynpro Matchcode-Subkeys
INCLUDE STRUCTURE D023S.
DATA: END OF DYM.
DATA: BEGIN OF DYL OCCURS 64, "Loop-Information
LTYP,
LANF TYPE X,
LBLK TYPE X,
LREP TYPE X,
END OF DYL.
n e u -
DATA: BEGIN OF TF OCCURS 0, "interne tabelle mit dynprofeldern
COUNT TYPE I VALUE 0, "zum abmischen
TRCD(4),
STAT(4),
PGM(8), "programmname
DYN(4) TYPE N, "dynpronummer
FNAME(35),
FARG(80),
FSTART(5) TYPE P,
FENDE(5) TYPE P,
END OF TF.
DATA: BEGIN OF DYT. "Dynpro Felder
INCLUDE STRUCTURE D021S.
DATA: END OF DYT.
DATA: BEGIN OF ANAL,
COUNT TYPE I VALUE 0, " zaehler
ECOUNT TYPE I VALUE 0, " zaehler
BA LIKE APQD-TRANS, " block anfang
BE LIKE APQD-TRANS, " block ende
OBA LIKE APQD-TRANS, " block anfang old
OBE LIKE APQD-TRANS, " block ende old
FKT1 LIKE APQD-TRANS, " faktor1
FKT2 LIKE APQD-TRANS, " faktor2
MAXBLK LIKE APQD-TRANS, " maximale blockanzahl
BLK# LIKE APQD-TRANS, " blocknummer lfd.
END OF ANAL.
interne Tabelle ---
DATA:
BEGIN OF ITAB OCCURS 0, "Interne Tabelle fuer Grundliste
COUNT LIKE APQI-TRANSCNT, "Record count, Hilfsfeld fuer debug
TCNT LIKE APQI-TRANSCNT, "transaction counter all
MCNT LIKE APQI-MSGCNT, "message counter all
ETCNT LIKE APQI-TRANSCNTE, "transaction counter errore
EMCNT LIKE APQI-MSGCNTE, "message counter error
DTCNT LIKE APQI-TRANSCNTD, "transaction counter delete
DMCNT LIKE APQI-MSGCNTD, "message counter delete
FTCNT LIKE APQI-TRANSCNTF, "transaction counter finished
FMCNT LIKE APQI-MSGCNTF, "message counter finished
BTCNT LIKE APQI-TRANSCNTF, "transaction counter booked
BMCNT LIKE APQI-MSGCNTF, "message counter booked
QDEL LIKE APQI-QERASE, "kennzeichen loeschen mappe
STATD(12),
END OF ITAB.
DATA:
BEGIN OF OLDI, "Headerdaten von Tapqd-udat (Vergl.)
HYC(1), "header eyecatcher
PGM(8), "programmname
DYN(4) TYPE N, "dynpronummer
SYNC(1), "syncpoint
STAT(1), "STatus
SCHAR(1), "Seperatorcharacter Def.
TRCD(4), "Trans.code
TCNT LIKE APQD-TRANS,
MCNT LIKE APQD-BLOCK,
END OF OLDI.
DATA: MFART(2) TYPE C, "Hilfsfelder abmischen dynpro mit
MFSTART TYPE I VALUE 0, "feldinhalten
MFENDE TYPE I VALUE 0,
MFLEN TYPE I VALUE 0.
DATA:
BEGIN OF Z, "Hilfsstruktur fuer sy-lisel
TRCD(04),
FILLER1(08),
STAT(03),
FILLER2(09),
PROG(08),
FILLER3(01),
DYN(04),
FILLER4(44),
END OF Z.
DATA:
BEGIN OF LF, "Hilfsstruktur fuer loop extension
FILLER1(01),
ZEILE(02) TYPE N,
FILLER2(01),
END OF LF.
DATA: ZEILE(2) TYPE P, "Hilfsfelder Dynproaufbereitung
SPALTE(2) TYPE P,
PLENG(2) TYPE P,
PLANF(2) TYPE P,
PLBLK(2) TYPE P,
PLREP(2) TYPE P,
ZAEHL(4) TYPE P,
PZEILE(2) TYPE P,
PCOLN(2) TYPE P.
DATA: BEGIN OF BILD OCCURS 24, " -''-
ZEILE(120),
FLAG,
END OF BILD,
CHAR79(79),
DYNAME(12).
DATA: BEGIN OF BILDE OCCURS 0, "Eingabefelder aufbereitet
ZEILE LIKE ZEILE,
PCOLN LIKE PCOLN,
PLENG LIKE PLENG,
PREP TYPE I,
GUIOBJ(01),
FLD(120),
END OF BILDE,
REF-ZEILE LIKE ZEILE.
DATA:
BEGIN OF BDC,
OKCODE(5), "Dynpro Okcode
CURSOR(35), "Cursorposition Feldname
END OF BDC. "oder Format ZZ,SS
DATA:
BEGIN OF CURSOR,
ZZ(2) TYPE N, "Zeile
FILLER(1), "Komma
SS(2) TYPE N, "Sspalte
END OF CURSOR. " Z = Zeile, S = Spalte
DATA:
BEGIN OF FLD,
FNAME(80),
FVAL(80),
END OF FLD.
DATA: "Popup 220 Groesse
BEGIN OF D220,
L TYPE I VALUE 10 , " links 10
O TYPE I VALUE 06 , " oben 06
R TYPE I VALUE 38 , " rechts38
U TYPE I VALUE 11 , " unten 11
END OF D220.
INCLUDE RSTR0110.
DATA: BEGIN OF PROT_LIST OCCURS 0.
INCLUDE RSTR0112.
DATA: SEEN(1),
TO_BE_DELETED(1),
HAS_CHANGED(1),
LOCAL_HOST(24),
END OF PROT_LIST.
DATA: "reports
REOREPORT(8) TYPE C VALUE 'RSBDCREO', " Protokollreorganisation
SUBREPORT(12) TYPE C VALUE 'RSBDCBTC_NEW', " Submit Batch
LOGREPORT(8) TYPE C VALUE 'RSBDCLOG', " Protokoll
DMPREPORT(12) TYPE C VALUE 'RSBDCDMP_NEW', " Queue Dump
TSTREPORT(8) TYPE C VALUE 'RSBDCCKT', " alle BDCLG Files in APQL?
APLREPORT(8) TYPE C VALUE 'RSBDCCKA'. " TemSe File zu APQL-Eintrag?
TABLES: SNAP. "Rabaxauswertung
FIELD-SYMBOLS: .
DATA:
BEGIN OF D320, "Popup 320 Groesse
L TYPE I VALUE 30 , " links 30
O TYPE I VALUE 06 , " oben 06
R TYPE I VALUE 60 , " rechts60
U TYPE I VALUE 08 , " unten 08
END OF D320.
DATA: FOLGESEGMENT TYPE I,
SOFFS TYPE I ,
APQDVARLEN TYPE I,
BDCMHSEPC(01),
MAXVARDATALEN TYPE I VALUE 0.
*---- common part daten erhalten ein eigenes segment----
DATA BEGIN OF COMMON PART VARDAT.
DATA: APQDVARDATA(21333), " neue datenfelder wegen
*APQDVARDATA(21333), " segmentierten mappen
UDAT(21333).
DATA END OF COMMON PART VARDAT.
INCLUDE RSBDCIL1. " data definitionen fuer rsbdcil2
INCLUDE RSBDCIL2. " Forms zur Protokollanzeige
INCLUDE RSBDCIL3. " Form zum Lesen des TemSe Files
" in Anlehnung an LSTLGFXX.
*---- START OF SELECTION -
DATA: PROTPARAM(60) VALUE 'bdc/new_protocol',
NEWPROT(3) VALUE 'off'.
PARAMETER MAPPE LIKE APQI-GROUPID DEFAULT '*'.
PARAMETER QUEUE_ID LIKE APQD-QID DEFAULT '0' NO-DISPLAY.
PARAMETER TEMSEID LIKE APQL-TEMSEID DEFAULT '0' NO-DISPLAY.
START-OF-SELECTION.
CALL 'C_SAPGPARAM' ID 'NAME' FIELD PROTPARAM
ID 'VALUE' FIELD NEWPROT.
IF NEWPROT <> 'on'.
SUBMIT RSBDCOLG AND RETURN.
EXIT.
ENDIF.
CLEAR LOG.
IF SY-TCODE NE 'SE38'. " runlevel festlegen
RUNLEVEL = SUBMIT.
ELSE.
RUNLEVEL = STANDALONE.
ENDIF.
IF SY-BATCH <> SPACE. " runlevel festlegen
RUNLEVEL = STANDALONE. " im batch
ENDIF.
IF RUNLEVEL = SUBMIT.
GET PARAMETER ID 'BDC' FIELD LOG.
ELSE.
PERFORM CHECK_PARAM.
ENDIF.
CLEAR: BDCLD, SHOWTYP.
REFRESH: BDCLD.
IF LOG-MODUS EQ 'A' OR
LOG-MODUS EQ 'B'.
IF LOG-TEXT(17) NE SPACE.
MOVE LOG-TEXT TO ZWD.
MOVE ZWD-VDAT TO VDAT.
PERFORM MAKE_DATE USING ZWD-VDAT VDAT.
MOVE ZWD-BDAT TO BDAT.
PERFORM MAKE_DATE USING ZWD-BDAT BDAT.
ELSE.
MOVE '00000000' TO VDAT.
MOVE '99999999' TO BDAT.
ENDIF.
ENDIF.
CASE LOG-MODUS.
WHEN 'A'.
SET PF-STATUS 'ALPH'.
SET TITLEBAR 'ALP'.
PERFORM ALL_PROT. "vh3914
PERFORM LOG_ALL.
PERFORM SHOW_DIR.
WHEN 'B'.
SET PF-STATUS 'ALPH'.
SET TITLEBAR 'ALP'.
PERFORM ALL_PROT. "vh3914
PERFORM LOG_ALL.
PERFORM SHOW_DIRP.
WHEN 'C'.
SET PF-STATUS 'ALPO'.
SET TITLEBAR 'ALP'.
PERFORM ALL_PROT. "vh3914
PERFORM LOG_ALL.
PERFORM INFO_BIPROT.
IF LOG-TCNT GT 1.
LOG-MODUS = 'F'.
SET PF-STATUS 'ALPF'.
PERFORM SHOW_DIRF.
ELSE.
PERFORM SHOW_DIRQ.
ENDIF.
WHEN 'D'.
SET PF-STATUS 'ALPO'.
SET TITLEBAR 'ALP'.
PERFORM ALL_PROT. "vh3914
PERFORM LOG_ALL.
PERFORM SHOW_DIR.
WHEN 'E'.
SET PF-STATUS 'ALPO'.
SET TITLEBAR 'ALP'.
PERFORM ALL_PROT. "vh3914
PERFORM LOG_ALL.
PERFORM SHOW_DIRE.
WHEN 'M'.
SET PF-STATUS 'MESS'.
SET TITLEBAR 'MSG' WITH LOG-MAPN.
CLEAR BDCLD.
MOVE-CORRESPONDING LOG TO BDCLD.
MOVE LOG-MAPN TO BDCLD-GROUPID.
MOVE LOG-QUID TO BDCLD-QID.
PERFORM LOG_MES.
PERFORM SHOW_MES.
WHEN 'P'.
PERFORM ALL_PROT. "vh3914
PERFORM INFO_BIPROT.
WHEN 'Q'.
PERFORM ALL_PROT. "vh3914
PERFORM DELE_BIPROT.
WHEN OTHERS.
SET PF-STATUS 'ALPH'.
SET TITLEBAR 'ALP'.
PERFORM ALL_PROT. "vh3914
PERFORM LOG_ALL.
PERFORM SHOW_DIR.
ENDCASE.
PERFORM SEND_MSG.
SET PARAMETER ID 'BDC' FIELD LOG.
*---- PBO MODULE REPORT RSBDCLOG -
MODULE D0220_POPINI PBO *
Initialisierung der Cursor-Eingabe-Felder (ja,nein) in Popup *
MODULE D0220_POPINI OUTPUT.
CLEAR: ZW-FNAME.
ZW-FNAME = 'D0220-POPNEIN'.
SET CURSOR FIELD ZW-FNAME.
SET PF-STATUS '0220'.
SET TITLEBAR '009'.
D0220-POPJA = TEXT-027. "ja
D0220-POPNEIN = TEXT-028. "nein
ENDMODULE. " D0220_POPINI.
MODULE D0320_INIT PBO *
Initialisierung der Felder des Dynpros 0320 *
MODULE D0320_INIT OUTPUT.
Initialisierung der Dynprofelder
SET PF-STATUS '0320'.
SET TITLEBAR '015'.
CLEAR: D0320-FCODE.
CLEAR: D0300-BATCHSYS.
ENDMODULE. " D0300_INIT.
*---- PAI MODULE REPORT RSBDCLOG -
MODULE D0220_DELETE PAI *
Loeschen eines Protokolls *
MODULE D0220_DELETE.
IF SY-UNAME EQ AUTOR. BREAK-POINT 1. ENDIF.
CLEAR: ZW-FNAME.
GET CURSOR FIELD ZW-FNAME.
IF D0220-FCODE = 'CONT' OR " f12 abbrechen, nein
SY-CUROW = 7 OR
SY-CUROW = 4 OR
ZW-FNAME = 'D0220-POPNEIN' OR
ZW-FNAME = 'D0220-POPCONT'.
RETURN = 0.
ENDIF.
IF D0220-FCODE <> 'CONT' AND " ja
( ZW-FNAME = 'D0220-POPJA' OR
SY-CUROW = 5 ).
RETURN = 0.
D0220-FCODE = 'DEL'.
ENDIF.
ENDMODULE. " D0220_DELETE
MODULE D0320_START *
Angabe der Blocknummer in der Mappenanalyse *
MODULE D0320_FCODE.
CASE D0320-FCODE.
WHEN ' ' . "normale verarbeitung
IF D0300-BLOCKNR GT ANAL-MAXBLK OR
D0300-BLOCKNR LE 0.
RETURN = 328.
PERFORM SEND_MSG.
SET SCREEN 320.
ENDIF.
WHEN 'GOON' . "normale verarbeitung
IF D0300-BLOCKNR GT ANAL-MAXBLK OR
D0300-BLOCKNR LE 0.
RETURN = 328.
PERFORM SEND_MSG.
SET SCREEN 320.
ENDIF.
WHEN 'CONT' . "f12 abbrechen
WHEN OTHERS .
SET PF-STATUS '0320'.
SET TITLEBAR '015'.
SET SCREEN 320.
ENDCASE. "D0320-FCODE
ENDMODULE. " d0320_fcode
FORM : info_biprot *
Info ueber ein Protokoll *
FORM INFO_BIPROT.
CLEAR: QFOUND.
LOOP AT BDCLD.
IF LOG-QUID EQ BDCLD-QID.
QFOUND = QFOUND + 1.
ENDIF.
ENDLOOP.
IF QFOUND GT 0.
LOG-RETC = 'PROT'.
LOG-TCNT = QFOUND.
ENDIF.
ENDFORM. " info_biprot
FORM : dele_biprot *
loeschen eines Protokolls von aussen *
FORM DELE_BIPROT.
CLEAR: QFOUND.
LOOP AT BDCLD.
IF LOG-QUID EQ BDCLD-QID.
QFOUND = QFOUND + 1.
PERFORM DEL_MESL.
ENDIF.
ENDLOOP.
IF QFOUND GT 0.
LOG-RETC = 'DELE'.
LOG-TCNT = QFOUND.
ENDIF.
ENDFORM. " dele_biprot
FORM : all_prot "vh3914 *
FORM ALL_PROT.
CLEAR: BDCLD-CNT,
BDCLD#.
PERFORM LOG_ALL. "vh3914
IF BDCLD-CNT EQ 0. "vh3914
RETURN = 318. "vh3914
EXIT. "vh3914
ELSE. "vh3914
RETURN = 0. "vh3914
ENDIF. "vh3914
SORT: BDCLD BY CREDATE DESCENDING "vh3914
CRETIME DESCENDING. "vh3914
ENDFORM. " all_prot
FORM : log_all *
FORM LOG_ALL.
PERFORM LOG_DIR.
ENDFORM. " log_all.
FORM : show_all *
FORM SHOW_ALL.
PERFORM SHOW_DIR.
ENDFORM. " show_all.
FORM : log_dir *
FORM LOG_DIR.
CLEAR: BDCLD.
REFRESH: BDCLD.
CLEAR: BDCLDA. "vh3914
REFRESH: BDCLDA. "vh3914
SELECT * FROM APQL INTO TABLE BDCLDA. "protocol directory data
IF SY-SUBRC = 4. " Verzeichnis ist leer
RETURN = 318. "MESSAGE S318 WITH 'Verzeichnis'
EXIT.
ENDIF.
IF SY-SUBRC NE 0. " Fehler beim Lesen des Verzeichni
RETURN = 317. "MESSAGE S317 WITH 'Verzeichnis' 'gelesen
EXIT.
ENDIF.
SORT: BDCLDA BY CREDATE DESCENDING
CRETIME DESCENDING.
LOOP AT BDCLDA "vh3914
WHERE MANDANT = SY-MANDT.
MOVE-CORRESPONDING BDCLDA TO BDCLD. "vh3914
BDCLD-CNT = BDCLD-CNT + 1. "vh3914
BDCLD# = BDCLD# + 1. "vh3914
APPEND BDCLD. "vh3914
ENDLOOP. "vh3914
ENDFORM. " log_dir.
FORM : show_dir *
FORM SHOW_DIR.
IF SY-UNAME EQ AUTOR. BREAK-POINT 1. ENDIF.
IF RETURN GT 0.
EXIT.
ENDIF.
SHOWTYP = 'DIR '.
LOOP AT BDCLD WHERE CREDATE GE VDAT
AND CREDATE LE BDAT.
FORMAT RESET.
WRITE:/01(102) SPACE COLOR COL_NORMAL.
WRITE: 24(27) BDCLD-GROUPID COLOR COL_KEY INTENSIFIED ON.
PERFORM WRITE_DATE USING BDCLD-CREDATE.
WRITE: 02(10) DATE1 DD/MM/YYYY COLOR COL_NORMAL,
13(08) BDCLD-CRETIME USING EDIT MASK '__:__:__'
COLOR COL_NORMAL.
WRITE: 52(12) BDCLD-CREATOR COLOR COL_NORMAL,
81(24) BDCLD-DESTSYS COLOR COL_NORMAL.
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 12.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 80.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
HIDE: BDCLD, BDCLD#.
ENDLOOP.
PERFORM LAST_LISTLINE.
LINCT0 = SY-SROWS. "seitengroesse grundliste festhalten
ENDFORM. " show_dir.
FORM : show_dirp *
FORM SHOW_DIRP.
show directory for log-name
IF RETURN GT 0.
EXIT.
ENDIF.
SHOWTYP = 'DIRP '.
CLEAR: NAMELN, LMAPN, TFOUND.
IF LOG-MAPN CA '%'.
NAMELN = SY-FDPOS.
WRITE LOG-MAPN TO LMAPN(NAMELN).
ELSE.
IF LOG-MAPN CA ' '.
NAMELN = SY-FDPOS.
ELSE.
NAMELN = 12.
ENDIF.
WRITE LOG-MAPN TO LMAPN(NAMELN).
ENDIF.
LOOP AT BDCLD WHERE CREDATE GE VDAT
AND CREDATE LE BDAT.
CLEAR: TMAPN.
WRITE BDCLD-GROUPID TO TMAPN(NAMELN).
IF LMAPN EQ TMAPN.
TFOUND = TFOUND + 1.
FORMAT RESET.
WRITE:/01(102) SPACE COLOR COL_NORMAL.
WRITE: 24(27) BDCLD-GROUPID COLOR COL_KEY INTENSIFIED ON.
PERFORM WRITE_DATE USING BDCLD-CREDATE.
WRITE: 02(10) DATE1 DD/MM/YYYY
COLOR COL_NORMAL,
13(08) BDCLD-CRETIME USING EDIT MASK '__:__:__'
COLOR COL_NORMAL,
52(12) BDCLD-CREATOR COLOR COL_NORMAL,
81(24) BDCLD-DESTSYS COLOR COL_NORMAL.
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 12.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 80.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
HIDE: BDCLD, BDCLD#.
ENDIF.
ENDLOOP.
IF TFOUND = 0.
RETURN = 324. " keine Protokolle gefunden
ELSE.
PERFORM LAST_LISTLINE.
ENDIF.
LINCT0 = SY-SROWS. "seitengroesse grundliste festhalten
ENDFORM. " show_dirp.
FORM : show_dirq *
FORM SHOW_DIRQ.
show directory and message for QUEUE_ID
IF RETURN GT 0.
EXIT.
ENDIF.
SHOWTYP = 'DIRQ '.
CLEAR: QFOUND, LMAPN.
LOOP AT BDCLD.
IF LOG-QUID EQ BDCLD-QID.
QFOUND = QFOUND + 1.
QFOUND = 1.
IF QFOUND = 1.
FORMAT COLOR COL_HEADING INTENSIFIED ON.
WRITE:/01(102) SY-ULINE.
WRITE:/24(12) 'Mappenname '(003).
WRITE: 02(11) 'Angelegt '(004),
12(08) ' ',
52(12) 'User '(005).
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
FORMAT INTENSIFIED.
WRITE:/24(12) SY-ULINE,
02(80) SY-ULINE,
12(08) SY-ULINE,
52(40) SY-ULINE.
PERFORM WRITE_VLINE USING 'T' 23.
PERFORM WRITE_VLINE USING 'T' 51.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
ENDIF.
FORMAT RESET.
IF BDCLD-GROUPID NE LMAPN.
WRITE:/01(102) SPACE COLOR COL_NORMAL.
WRITE: 24(27) BDCLD-GROUPID COLOR COL_KEY INTENSIFIED ON.
LMAPN = BDCLD-GROUPID.
PERFORM WRITE_DATE USING BDCLD-CREDATE.
WRITE: 02(10) DATE1 DD/MM/YYYY COLOR COL_NORMAL ,
13(08) BDCLD-CRETIME USING EDIT MASK '__:__:__'
COLOR COL_NORMAL .
WRITE: 52(12) BDCLD-CREATOR COLOR COL_NORMAL ,
80(24) BDCLD-DESTSYS COLOR COL_NORMAL .
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
ENDIF.
MTAB-GROUPID = BDCLD-GROUPID.
PERFORM BIM_BERECHTIGUNG USING BIM-ANAL X.
IF SY-SUBRC NE 0.
HIDE: BDCLD, BDCLD#.
EXIT.
ENDIF.
WRITE:/01(102) SY-ULINE.
WRITE:/01(102) SPACE COLOR COL_HEADING INTENSIFIED OFF.
WRITE: 02 'Zeit '(001) COLOR COL_HEADING INTENSIFIED OFF,
11 'Tran'(008) COLOR COL_HEADING INTENSIFIED OFF,
16 'Dynpro'(007) COLOR COL_HEADING INTENSIFIED OFF,
30 'Nachricht'(002) COLOR COL_HEADING INTENSIFIED OFF.
63 DATE1 DD/MM/YYYY.
PERFORM WRITE_VLINE USING 'T' 10.
PERFORM WRITE_VLINE USING 'T' 15.
PERFORM WRITE_VLINE USING 'T' 29.
PERFORM WRITE_VLINE USING 'T' 1.
PERFORM WRITE_VLINE USING 'T' 102.
WRITE: /02(09) SY-ULINE,
11(04) SY-ULINE,
16(13) SY-ULINE,
30(60) SY-ULINE.
PERFORM WRITE_VLINE USING 'T' 10.
PERFORM WRITE_VLINE USING 'T' 15.
PERFORM WRITE_VLINE USING 'T' 29.
PERFORM WRITE_VLINE USING 'T' 1.
PERFORM WRITE_VLINE USING 'T' 102.
FORMAT RESET.
PERFORM LOG_MES.
PERFORM SHOW_MES.
DO 1 TIMES.
WRITE:/01(102) SPACE COLOR COL_NORMAL.
PERFORM WRITE_VLINE USING 'T' 10.
PERFORM WRITE_VLINE USING 'T' 15.
PERFORM WRITE_VLINE USING 'T' 29.
PERFORM WRITE_VLINE USING 'T' 1.
PERFORM WRITE_VLINE USING 'T' 102.
ENDDO.
HIDE: BDCLD, BDCLD#.
EXIT. " protokoll gefunden, bye
ENDIF. " immer das neueste protokoll
ENDLOOP.
IF QFOUND = 0.
RETURN = 324. " keine Protokolle gefunden
ELSE.
PERFORM LAST_LISTLINE.
ENDIF.
LINCT0 = SY-SROWS. "seitengroesse grundliste festhalten
ENDFORM. " show_dirq.
FORM : show_dirm *
FORM SHOW_DIRM.
show directory and message for QUEUE_ID
at line-selection
SHOWTYP = 'DIRM '.
CLEAR: QFOUND, LMAPN.
IF LOG-QUID EQ BDCLD-QID.
QFOUND = QFOUND + 1.
IF QFOUND = 1.
FORMAT COLOR COL_HEADING INTENSIFIED ON.
WRITE:/01(102) SY-ULINE.
WRITE:/24(12) 'Mappenname '(003).
WRITE: 02(11) 'Angelegt '(004),
12(08) ' ',
52(50) 'User '(005).
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
FORMAT INTENSIFIED.
WRITE:/24(12) SY-ULINE,
02(80) SY-ULINE,
12(08) SY-ULINE,
52(80) SY-ULINE.
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
ENDIF.
FORMAT RESET.
IF BDCLD-GROUPID NE LMAPN.
WRITE:/01(102) SPACE COLOR COL_NORMAL.
WRITE: 24(27) BDCLD-GROUPID COLOR COL_KEY INTENSIFIED ON.
LMAPN = BDCLD-GROUPID.
PERFORM WRITE_DATE USING BDCLD-CREDATE.
WRITE: 02(10) DATE1 DD/MM/YYYY COLOR COL_NORMAL ,
13(08) BDCLD-CRETIME USING EDIT MASK '__:__:__'
COLOR COL_NORMAL .
WRITE: 52(12) BDCLD-CREATOR COLOR COL_NORMAL ,
80(24) BDCLD-DESTSYS COLOR COL_NORMAL .
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
ENDIF.
MTAB-GROUPID = BDCLD-GROUPID.
PERFORM BIM_BERECHTIGUNG USING BIM-ANAL X.
IF SY-SUBRC NE 0.
HIDE: BDCLD, BDCLD#.
EXIT.
ENDIF.
WRITE:/01(102) SPACE COLOR COL_HEADING INTENSIFIED OFF.
WRITE: 02 'Zeit '(001) COLOR COL_HEADING INTENSIFIED OFF,
11 'Tran'(008) COLOR COL_HEADING INTENSIFIED OFF,
16 'Dynpro'(007) COLOR COL_HEADING INTENSIFIED OFF,
30 'Nachricht'(002) COLOR COL_HEADING INTENSIFIED OFF.
PERFORM WRITE_VLINE USING ' ' 10.
PERFORM WRITE_VLINE USING ' ' 15.
PERFORM WRITE_VLINE USING ' ' 29.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
WRITE: 01(09) SY-ULINE,
11(04) SY-ULINE,
16(13) SY-ULINE,
30(80) SY-ULINE.
PERFORM WRITE_VLINE USING ' ' 10.
PERFORM WRITE_VLINE USING ' ' 15.
PERFORM WRITE_VLINE USING ' ' 29.
PERFORM WRITE_VLINE USING ' ' 1.
PERFORM WRITE_VLINE USING ' ' 102.
FORMAT RESET.
PERFORM LOG_MES.
PERFORM SHOW_MES.
DO 1 TIMES.
WRITE:/01(102) SPACE COLOR COL_NORMAL.
PERFORM WRITE_VLINE USING 'T' 10.
PERFORM WRITE_VLINE USING 'T' 15.
PERFORM WRITE_VLINE USING 'T' 29.
PERFORM WRITE_VLINE USING 'T' 1.
PERFORM WRITE_VLINE USING 'T' 102.
ENDDO.
HIDE: BDCLD, BDCLD#.
ENDIF.
IF QFOUND = 0.
RETURN = 324. " keine Protokolle gefunden
ELSE.
PERFORM LAST_LISTLINE.
ENDIF.
LINCT0 = SY-SROWS. "seitengroesse grundliste festhalten
ENDFORM. " show_dirm.
FORM : show_dire *
FORM SHOW_DIRE.
show directory and message for QUEUE_ID
IF RETURN GT 0.
EXIT.
ENDIF.
SHOWTYP = 'DIRE '.
CLEAR: QFOUND, LMAPN.
LOOP AT BDCLD.
IF LOG-QUID EQ BDCLD-QID.
QFOUND = QFOUND + 1.
IF QFOUND = 1.
FORMAT COLOR COL_HEADING.
WRITE:/01(102) SY-ULINE.
WRITE:/01(102) SPACE.
WRITE: 24(12) 'Mappenname '(003),
02(10) 'Angelegt '(004),
12(08) ' ',
52(50) 'User '(005).
PERFORM WRITE_VLINE USING ' ' 01.
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 102.
FORMAT INTENSIFIED.
WRITE:/24(12) SY-ULINE,
01(80) SY-ULINE,
12(40) SY-ULINE,
52(80) SY-ULINE.
PERFORM WRITE_VLINE USING ' ' 01.
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 102.
ENDIF.
FORMAT RESET.
IF BDCLD-GROUPID NE LMAPN.
WRITE:/24(12) BDCLD-GROUPID.
WRITE:/01(102) SPACE COLOR COL_NORMAL.
WRITE: 24(27) BDCLD-GROUPID COLOR COL_KEY INTENSIFIED ON.
LMAPN = BDCLD-GROUPID.
PERFORM WRITE_DATE USING BDCLD-CREDATE.
WRITE: 02(10) DATE1 DD/MM/YYYY COLOR COL_NORMAL,
13(08) BDCLD-CRETIME USING EDIT MASK '__:__:__'
COLOR COL_NORMAL.
PERFORM GET_STAT USING BDCLD-STATE WSTAT.
WRITE: 40(03) WSTAT COLOR COL_NORMAL,
WRITE: 52(12) BDCLD-CREATOR COLOR COL_NORMAL,
80(24) BDCLD-DESTSYS COLOR COL_NORMAL.
PERFORM WRITE_VLINE USING ' ' 01.
PERFORM WRITE_VLINE USING ' ' 23.
PERFORM WRITE_VLINE USING ' ' 51.
PERFORM WRITE_VLINE USING ' ' 102.
WRITE:/01(102) SY-ULINE.
ENDIF.
FORMAT INTENSIFIED.
WRITE:/.
WRITE:/01(102) SPACE COLOR COL_HEADING INTENSIFIED OFF.
WRITE: 02 'Zeit '(001) COLOR COL_HEADING INTENSIFIED OFF,
11 'Tran'(008) COLOR COL_HEADING INTENSIFIED OFF,
16 'Dynpro'(007) COLOR COL_HEADING INTENSIFIED OFF,
30 'Nachricht'(002) COLOR COL_HEADING INTENSIFIED OFF.
PERFORM WRITE_VLINE USING ' ' 01.
PERFORM WRITE_VLINE USING ' ' 10.
PERFORM WRITE_VLINE USING ' ' 15.
PERFORM WRITE_VLINE USING ' ' 29.
PERFORM WRITE_VLINE USING ' ' 102.
FORMAT INTENSIFIED.
WRITE:
/01(09) SY-ULINE,
11(04) SY-ULINE,
16(13) SY-ULINE,
30(80) SY-ULINE.
PERFORM WRITE_VLINE USING ' ' 10.
PERFORM WRITE_VLINE USING ' ' 15. -
HT204266 Aps are not fully displaying on my iPad
When I go to my aps icon open it to buy new ones they will not display or fully open.
Hi Pat,
I have Adobe Reader XI. I can see them online but cannot open fully in Reader. I am using MS Windows XP Professional (Version 2002) -
Image in NSImageView is not fully displayed upon load, is full when clicked
I have an NSImageView that is intended to display a subject image. It is loaded with:
set image of image view "imgviewSubject" of window "wndmain" to load image ThePickedPathName
About a quarter of image's right hand side is missing and jagged when the image first loads. A click on the image redraws the image to its full view. The entire image needs to show.
The " Editable" property has to be set for this to regen click to work. The image view is in the 250 x 200 range. It does not matter if the image is set to be proportional or scaled to fit. The image file size does not seem to be a factor in this problem.
How can I get the image to show in full without requiring an additional user input.
Tia, AKSI found this in the ASStudio terminology ref:
needs display
Access: read/write
Class: boolean
Does the view need to be displayed? setting this property to true will cause the view to be redrawn at the next opportunity; to cause an immediate redraw, use the update command; note that through AppleScript Studio version 1.4, the needs display property is not supported for the window class, but is supported for the view class
Which lead me to this:
update
Updates display of the specified window or view object, causing it to be redrawn immediately.
Syntax
update reference required
Parameters
reference
a reference to the window or view object to update
Examples
The following is the launched handler, from the Browser sample application, available at /Developer/Examples/AppleScript Studio. This handler uses the Finder application to get a list of disk names for a browser object, sets a path separator for the browser, then uses the update command to update the browser’s display.
on launched theObject
tell application "Finder"
set diskNames to name of every disk
end tell
set path separator of browser "browser" of window "main" to ":"
tell browser "browser" of window "main" to update
end launched
So maybe as a last step in setting up your image view, you need to:
tell image view "imgviewSubject" of window "wndmain" to update
Let's see what that does.
St!ff -
Web page is not fully displayed in FireFox, but Chrome
Recently, I have made some changes to my company website, actually just the images of our team. <br />
The size of the image before is 130x130 but we changed it to 127x170.<br />
Everything worked good on localhost but then I uploaded it to the server. I tested the site on Google Chrome first (everything worked nicely) but FireFox didn't show up all the team images as the last line are cropped. <br />
You can have a look at "http://www.webnam.net.vn (Section About->Team). (Make sure you view it on Chrome & Firefox to see the differences here, which I want to say).<br />
I haven't changed anything on CSS (just HTML with some <li> changes). <br />
Thank you for your attention. <br />
Hope someone figured it out already.Looks the same for me in Firefox and Google Chrome on Linux.
Note that Firefox has the habit of using cached versions of files and may not always retrieve the current version from the server, so you need to refresh those files.
Reload web page(s) and bypass the cache to refresh possibly outdated or corrupted files.
*Hold down the Shift key and left-click the Reload button
*Press "Ctrl + F5" or press "Ctrl + Shift + R" (Windows,Linux)
*Press "Command + Shift + R" (Mac)
Clear the cache and cookies only from websites that cause problems.
"Clear the Cache":
*Firefox/Tools > Options > Advanced > Network > Cached Web Content: "Clear Now"
"Remove Cookies" from sites causing problems:
*Firefox/Tools > Options > Privacy > Cookies: "Show Cookies" -
When I right click on a link, the usual menu I used to get in older versions of firefox still shows up. However, it shows up in a box that's much, much smaller than the size of the box in previous versions. The text gets cut off and while I can scroll up and down, I can't scroll left to right to read the text of the option. Actually, I've noticed that this happens with most right click menus now.
For example, if I right-click on a link, I get:
Open Li...
Open Li...
Open Li...
(down facing arrow to hover over to see the rest of the options)
All of the system and Firefox fontsize, menu size etc. are at their default. I haven't changed anything.You can check for problems caused by a corrupted localstore.rdf file.
*http://kb.mozillazine.org/Corrupt_localstore.rdf
You can use this button to go to the currently used Firefox profile folder:
*Help > Troubleshooting Information > Profile Directory: Show Folder (Linux: Open Directory; Mac: Show in Finder)
Create a new profile as a test to check if your current profile is causing the problem.
See "Creating a profile":
*https://support.mozilla.org/kb/profile-manager-create-and-remove-firefox-profiles
*http://kb.mozillazine.org/Standard_diagnostic_-_Firefox#Profile_issues
If the new profile works then you can transfer files from a previously used profile to the new profile, but be cautious not to copy corrupted files to avoid carrying over the problem
*http://kb.mozillazine.org/Transferring_data_to_a_new_profile_-_Firefox -
PDF with javaScript function from Pro, not fully functional in Reader
Hi,
I followed recommendations to set up a button and apply a javaScript so that when end-user clicks on button, they can upload an image and then save the PDF.
However, in Reader, the file extension drop-down is locked and forces end-user to only have the option of selecting a PDF as their image. I was going for JPG or GIF here at the very least.
Is there anything else I could do, or am I stuck? In Pro, the drop down presents a wide array of file types in which to select from...
Thank you!Adobe Reader can only insert PDF files as images. Adobe Reader can't convert other files.
-
HT203175 itunes store does not fully display
When I open iTunes (yes, it is the latest version), the iTunes store doesn't display properly. Images don't display. I can't link to anything, or purchase anything. I am running Windows XP.
Perhaps try the iTunes Store loads partially or returns "Error 306" or "Error 10054" section in the Specific Conditions and Alert Messages: (Mac OS X / Windows) section of the following document:
iTunes: Advanced iTunes Store troubleshooting -
Passwords visible in session logs
Hi,
When I set up a developer as a developer with no workspace management rights, they can still access the monitor activity area.
If they go to
Manage Workspace>Monitor>Recent Page Views
and click on a session detail of one of our users testing the applications then they get to see the passwords being used to log into the application.
Is there a way of stopping the access to this area and/or stopping the session logs from recording the passwords in plain english?
...DavidHi Scott,
The application(s) where this is happening relate to systems where we have used basically a copy of the demo application log in page (ie page 101). The password is being reported in the session log files as p101_password (full text in English).
It does not happen if the user logs directly into the application (btw it is a ldap authentication).
If however a developer hits the 'run' button and then either they or a user sitting next to them then logs in to test the application, then it does hold the password in the logs (it is held in the application = 4350 page views).
I have just found out that In another instance of htmldb here (on a separate database) they have also copied the p101 log in page and it does not happen in their case - but we can't see any differences in the log in pages?
I am happy to send through a page export if you want to see it?
...david.
Maybe you are looking for
-
"this accessory may not be supported" iOs 7.0.3
Since updating to iOS 7.0.3 I've getting a prompt "this accessory may not be supported" after a few minutes charging. Charging then stops and I've unplug the cable and reconnect, then hopefully get another 5 minutes before the message appears again.
-
Why cant i open pdf files with adobe on my phone?
Why can't I open PDF files on my phone if I have adobe installed?
-
Online php form (inserts) in pdf form and send via email
So first hello all. There are 4 PDF Forms amd 4 php forms on a website. The user should be able to fill out the php form, click on send and the inserts from the user should be stored in the pdf form and send to an email adress. I know that there are
-
how do I unzip a zip file? is it safe to download a zip file from apple website?
-
Hello Together, I like to implement a QoS Policy class to prioritise "Windows Netmeeting". Does somebody know the well known port number and can somebody recommend an bandwidth that i should provide at least to this class ? Thanks in advance.