How can we know the source code no.of lines

hi guys!
please help me, how can we check the source code(No. of lines)in program with out comments

hi,
Use this code. Replace with your program name with the text in bold. V_lines gives the no of lines of code excluding comments and as well blank lines.
TYPES: BEGIN OF t_type,
         line(72),
       END OF t_type.
DATA: program LIKE sy-repid
                 VALUE <b>'Z_ABC_INNER_JOIN'</b>,
      t TYPE STANDARD TABLE OF t_type WITH HEADER LINE.
DATA: v_lines TYPE i.
READ REPORT program INTO t.
IF sy-subrc =0.
  LOOP AT t.
    IF t+0(1) = '*' OR t IS INITIAL.
      DELETE t INDEX sy-tabix.
    ENDIF.
  ENDLOOP.
  DESCRIBE TABLE t LINES v_lines.
ENDIF.
WRITE : v_lines.
Regards,
Sailaja.

Similar Messages

  • How can i get the source code from java concurrent program in R12

    Hi 2 all,
    How can i get the source code from java concurrent program in R12? like , "AP Turnover Report" is java concurrent program, i need to get its source code to know its logic. how can i get its source code not the XML template?
    Regards,
    Zulqarnain

    user570667 wrote:
    Hi 2 all,
    How can i get the source code from java concurrent program in R12? like , "AP Turnover Report" is java concurrent program, i need to get its source code to know its logic. how can i get its source code not the XML template?
    Regards,
    ZulqarnainDid you see old threads for similar topic/discussion? -- https://forums.oracle.com/forums/search.jspa?threadID=&q=Java+AND+Concurrent+AND+Source+AND+Code&objID=c3&dateRange=all&userID=&numResults=15&rankBy=10001
    Thanks,
    Hussein

  • How can we know the return code of BDC Program ?

    Hi All,
    Please tell me : How can we know the return code of BDC Program when being exceuted in Session or in Transaction mode.
    In my program, we are uploading data from Excel sheet to SAP via BDC
    The records that are not updated we want to create a log file.
    Now to know whether a record is updated ot not, wat syst field shloud be used?
    Its urgent....
    <b>Reward Point will be there ....</b>
    Thanks,
    Harish

    Hi harish,
    try the logic in this code ...
    i had attached input file in the end.
    TYPES: begin of errmess,
            msgnr type t100-msgnr,
            text type t100-text,
           end of errmess.
    TABLES : t100.
    DATA: BEGIN OF DD_VA01,
           AUART TYPE VBAK-AUART,
           KUNNR TYPE RV45A-KUNNR,
           BSTKD TYPE VBKD-BSTKD,
           MABNR TYPE RV45A-MABNR,
           KWMENG(2) type C,
           KBETR(2) type C,
          END OF DD_VA01.
    DATA:IT_VA01     Like TABLE OF DD_VA01,
         WA_VA01     Like LINE  OF IT_VA01,
         WA_VA01_F   Like LINE  OF IT_VA01,
         IT_BDCDATA  TYPE TABLE OF BDCDATA,
         WA_BDCDATA  Like Line  OF IT_BDCDATA,
         W_FNAME     TYPE STRING,
         messtab like bdcmsgcoll occurs 0 with header line,
         it_errmess type table of errmess,
         wa_errmess like line of it_errmess,
         err_message type string.
    data: zf1 type i,
          zc1 type c value '2',
          fn(20) type c.
    Main Code ************************************************************
    PERFORM get_input using 'C:\Documents and Settings\ic881592\Desktop\Daran_bdc_VA01-e.txt'.
    SORT IT_VA01 BY AUART KUNNR BSTKD.
    LOOP AT IT_VA01 INTO WA_VA01.
      if WA_VA01_F-AUART <> WA_VA01-AUART OR
         WA_VA01_F-KUNNR <> WA_VA01-KUNNR OR
         WA_VA01_F-BSTKD <> WA_VA01-BSTKD.
           PERFORM set_header_flag.
           PERFORM create_bdc_header_data.
      endif.
      PERFORM create_bdc_item_data.
    ENDLOOP.
    PERFORM call_transaction.
    PERFORM errorlog.
    Procedures ***********************************************************
    form get_input using w_fname.
      CALL FUNCTION 'GUI_UPLOAD'
        EXPORTING
          FILENAME            = W_FNAME
          HAS_FIELD_SEPARATOR = '#'
        TABLES
          DATA_TAB            = IT_VA01.
    endform.
    form call_transaction.
        PERFORM bdc_field       using 'BDC_OKCODE' '/11'.
        CALL TRANSACTION 'VA01' USING IT_BDCDATA MODE 'A' messages into messtab.
        refresh it_bdcdata.
    endform.
    FORM set_header_flag.
           WA_VA01_F-AUART = WA_VA01-AUART.
           WA_VA01_F-KUNNR = WA_VA01-KUNNR.
           WA_VA01_F-BSTKD = WA_VA01-BSTKD.
           if zf1 = 1.
               PERFORM call_transaction.
           endif.
           zf1 = 1.
    endform.   "set_header_flag.
    form create_bdc_header_data.
         perform bdc_dynpro      using 'SAPMV45A' '0101'.
         perform bdc_field       using 'VBAK-AUART' WA_VA01-AUART.
         perform bdc_field       using 'BDC_OKCODE' '/00'.
         perform bdc_dynpro      using 'SAPMV45A' '4001'.
         perform bdc_field       using 'KUAGV-KUNNR' WA_VA01-KUNNR.
         perform bdc_field       using 'VBKD-BSTKD' WA_VA01-BSTKD.
         perform bdc_field       using 'BDC_OKCODE' '/00'.
         perform bdc_dynpro      using 'SAPMSSY0' '0120'.
         perform bdc_field       using 'BDC_CURSOR' '04/06'.
         perform bdc_field       using 'BDC_OKCODE' '=CHOO'.
         perform bdc_dynpro      using 'SAPMV45A' '4001'.
         PERFORM bdc_field       USING 'BDC_OKCODE' '=POAN'.
    endform. "create_bdcdata
    FORM create_bdc_item_data.
         CONCATENATE 'RV45A-KWMENG(' zc1 ')' INTO FN.
         perform bdc_field       using 'BDC_CURSOR' FN.
         perform bdc_field       using FN WA_VA01-KWMENG.
         CONCATENATE 'KOMV-KBETR(' zc1 ')' INTO FN.
         perform bdc_field       using FN WA_VA01-KBETR.
         CONCATENATE 'RV45A-MABNR(' zc1 ')' INTO FN.
         perform bdc_field       using FN WA_VA01-MABNR.
         perform bdc_dynpro      using 'SAPMV45A' '4001'.
         PERFORM bdc_field       USING 'BDC_OKCODE' '=POAN'.
    ENDFORM.
    form errorlog.
      LOOP AT MESSTAB .
        if MESSTAB-MSGNR = '311' or MESSTAB-MSGTYP = 'E'.
            SELECT SINGLE msgnr text FROM T100
                            into wa_errmess
                            WHERE SPRSL = MESSTAB-MSGSPRA
                              AND ARBGB = MESSTAB-MSGID
                              AND MSGNR = MESSTAB-MSGNR.
            IF SY-SUBRC = 0.
              err_message = wa_errmess-TEXT.
              IF err_message CS '&1'.
                REPLACE '&1' WITH MESSTAB-MSGV1 INTO err_message.
                REPLACE '&2' WITH MESSTAB-MSGV2 INTO err_message.
                REPLACE '&3' WITH MESSTAB-MSGV3 INTO err_message.
                REPLACE '&4' WITH MESSTAB-MSGV4 INTO err_message.
              ELSE.
                REPLACE '&' WITH MESSTAB-MSGV1 INTO err_message.
                REPLACE '&' WITH MESSTAB-MSGV2 INTO err_message.
                REPLACE '&' WITH MESSTAB-MSGV3 INTO err_message.
                REPLACE '&' WITH MESSTAB-MSGV4 INTO err_message.
              ENDIF.
              CONDENSE err_message.
              WRITE: / MESSTAB-MSGTYP, err_message .
            ELSE.
              WRITE: / MESSTAB.
            ENDIF.
        endif.
      ENDLOOP.
    endform. "errorlog
    FORM BDC_DYNPRO USING PROGRAM DYNPRO.
      WA_BDCDATA-PROGRAM  = PROGRAM.
      WA_BDCDATA-DYNPRO   = DYNPRO.
      WA_BDCDATA-DYNBEGIN = 'X'.
      APPEND WA_BDCDATA TO IT_BDCDATA.
      CLEAR  WA_BDCDATA.
    ENDFORM.
    FORM BDC_FIELD USING FNAM FVAL.
      WA_BDCDATA-FNAM = FNAM.
      WA_BDCDATA-FVAL = FVAL.
      APPEND WA_BDCDATA TO IT_BDCDATA.
      CLEAR  WA_BDCDATA.
    ENDFORM.
    input file :
    OR     2148     0001235     R-1162     8     17
    OR     2148     0001235     R-1161     2     30
    OR     2148     0001235     100-400     6     25
    OR     2148     0001235     R-1162     4     12
    OR     2148     0001236     R-1162     3     12
    OR     2148     0001236     R-1161     2     30
    OR     2148     0001236     100-400     1     25
    OR     2148     0001236     R-1162     7     12
    OR     2148     0001236     R-1161     8     30
    OR     2148     0001236     100-400     10     25
    OR     2148     0001235     R-1161     5     30
    OR     2148     0001235     100-400     2     25
    OR     2148     0001235     R-11621     3     12
    OR     2148     0001235     R-1161     2     30
    OR     2148     0001235     100-400     1     25
    OR     2148     0001235     R-1162     7     12
    OR     2148     0001235     R-1161     8     30
    OR     2148     0001235     100-400     10     25
    OR     2148     0001236     R-1162     8     17
    OR     2148     0001236     R-1161     2     30
    OR     2148     0001236     100-400     6     25
    OR     2148     0001236     R-1162     4     12
    OR     2148     0001236     R-1161     5     30
    OR     2148     0001236     100-400     2     25

  • How can I view the source code of chrome://browser/content/browser.xul?

    How can I view the source code of chrome://browser/content/browser.xul of mobile FireFox?
    In my desktop version I just open this page in new tab and view webpage source, but there is no option for FF mobile to view source code.
    Best regards.

    Does the view-source: protocol work on mobile?
    *view-source:chrome://browser/content/browser.xul

  • How can I get the source code of the google chrome ios app

    How can I get the source code of the google chrome ios app

    Google is your friend
    http://www.chromium.org/
    and
    https://developers.google.com/chrome/mobile/docs/iosoverview

  • HOW CAN I KNOW THE FUNCTION CODE OF CREATE NEW SESSION

    <b>HOW</b> CAN I KNOW THE FUNCTION CODE OF CREATE NEW SESSION?
    THANKS...

    Hi
    Please put a "/n" (to open a new session after killing the current session)
    or "/o" (to open a new session without killing the current session)
    or "/i" (to end the current session) before the below T Codes as per your requirement...
    Try thistoo <b>O0</b>
    <u><b>demo-like programs</b></u>
    RSIMC000
    RSIMC001
    RSIMC002
    RSIMC003
    RSIMCTRX
    RSIMCTST
    Reward all helpfull answers
    Regards
    Pavan

  • How can i change the source code of current date in oracle reports

    Hi All,
    How can i change the source of the current date to the sysdate of the database in oracle reports. I have more than 300 reports. is there any way to change quickly with opening each reports. I am working on reports11g on windows enviornment.
    Thanks in advance.

    benz wrote:
    Hi All,
    How can i change the source of the current date to the sysdate of the database in oracle reports. I have more than 300 reports. is there any way to change quickly with opening each reports. I am working on reports11g on windows enviornment.
    Thanks in advance.You have to use Reports Trigger named BEFORE PARAMETER FORM and write the following sql
    select sysdate into :Parameter_name from dual;
    give your format mask at Parameter_name.
    Hope this will help you
    If someone's response is helpful or correct, please mark it accordingly.

  • How can one encrypt the source code of a given web page(html, jsp, etc.) ?

    Good Day! I'm just having a hard time of thinking how to encrypt the source code of a given web page(html, jsp, etc.) without affecting how it is previewed in an Internet Browser. What I plan is to disable the capabilities of some malicious Internet users of copying the source codes of my web pages by using the "View Source" option of Internet Explorer and the equivalent function in Netscape Navigator. Please somebody help me in this matter (I'm planning to use an IDEA algorithm using JCE)....
    It would be big help if a running code is supplied.
    Thank you very much in advance.
    God Bless!!!
    - Jonathan Untalan([email protected])

    don't know theses softs. What i know about encrypted web pages, is that you need a secure socket connection (https).
    Your web page will be ciphered, send to the user, and decipher by the browser with the signature file associated to your https connexion.
    It isn't possible to encrypt your page directly, and then decrypt them when requested.
    For the download time, only the server is responsible for this.
    if it is overloaded, then it will slow down its upload.
    Maybe you use some encryption method that require a lot of CPU time.
    For summary : you can only cipher the pipe transport, but not the transported pages.
    Good luck in your search.

  • How can you scan the Source Code of a bunch of function modules

    We are in a 46C system. I need to be able to scan the soruce code of a bunch of function modules. I was unable to use the RPR_ABAP_SOURCE_SCAN and return the lines with the string I was searching for.
    Thanks
    Hari

    Hi,
    Read the main program that is the funtion pool into an internal table with statement.
    READ REPORT
    Use the key-word
    SCAN ABAP-SOURCE
    You can use the addition with includes as the function pool contains only include programs the with includes addition will read the source code present in the include.
    Like this you can achieve it
    " Example
    DATA:
      itab TYPE TABLE OF char255,
      itab1 TYPE TABLE OF stoken,
      itab2 TYPE TABLE OF sstmnt.
    READ REPORT 'SAPLSFES' INTO itab.
    SCAN ABAP-SOURCE itab TOKENS INTO itab1
                          STATEMENTS INTO itab2
                          WITH INCLUDES.
    after this you can search the string in the internal table with lots of additions available in the SCAN ABAP_SOURCE
    regards
    sarves

  • Parental Control, how can I know the remaining time (from command line)

    Hello,
    I did setup Parental Control on my kid's iMac.
    I configured a "Weekday Time Limit". On their desktop, they can get the information about the remaining time by clicking simply on the clock.
    I would like to know how I can get this information while I am connected via ssh
    Thank you in advance.

    Apparently all the Parental Controls preferences files are stored here:
    /Library » Application Support » Apple » ParentalControls » Users » username
    I imagine somewhere in there it keeps a record of the remaining time etc.  You'll need root authority to access Users onwards.

  • How can I get the connection code for the magic track pad?

    I want to use my magic trackpad and I scrapped the box with the connection code. How can I get it again? I don't need it for Mac, but yes for windows...

    user570667 wrote:
    Hi 2 all,
    How can i get the source code from java concurrent program in R12? like , "AP Turnover Report" is java concurrent program, i need to get its source code to know its logic. how can i get its source code not the XML template?
    Regards,
    ZulqarnainDid you see old threads for similar topic/discussion? -- https://forums.oracle.com/forums/search.jspa?threadID=&q=Java+AND+Concurrent+AND+Source+AND+Code&objID=c3&dateRange=all&userID=&numResults=15&rankBy=10001
    Thanks,
    Hussein

  • How can I get the souce code of a labview vi .

    Hi
    How can I get the source code of a labviw vi.
    Mal

    The LabVIEW block diagram is the source code.
    It is compiled through the LabVIEW environment into a format suitable for running.
    It does not go through an interim conversion to another language before it gets compiled, so
    there is no other source code. The actual vi breaks down into 4 parts :
    Front panel
    Block diagram
    Code (diagram compiled to machine code)
    Data (control and indicator values, default data, diagram constant data, and so on)
    Thanks
    Sacha Emery
    National Instruments (UK)
    // it takes almost no time to rate an answer

  • How Can i know the orders source. ?? IDOC or VA01

    Dear All,
    sometimes we create a new order with reference to the order which was created by using IDOC.
    How can I know the difference between ..
    1) Order created with VA01. (Some of the fields may copied from order created by IDoc.)
    2) orders created with IDOC.
    Please let me know.
    Thank you
    Madhu

    Thank you for your reply, but the suggestion you have given may work for us. as when we create a order with reference to other order or when we create a order using we19. the newly created order will have all the details of older order and that information will be in EDIDC, which will not be correct.
    regards
    madhu

  • How can I use a SCH-LC11 device in CHINA which bought from ebay. I am not Verizon customer but I prefer to using your 4G LTE Router . How can I get the unlock code? The device may have a bad ESN but I only use it in CHINA. Kindly looking forward your repl

    How can I use a SCH-LC11 device in CHINA which bought from ebay. I am not Verizon customer but I prefer to using your 4G LTE Router . How can I get the unlock code? The device may have a bad ESN but I only use it in CHINA. Kindly looking forward your reply. Thanks!

    It's good to read Antoniad's post.  It reassures me that I can use my new iPad as an international communication device which is the reason I purchased the thing.  However, I called Verizon today (my provider of cellular data) who told me that I can't just pop in a SIM card as you suggested.  He also said that he was from the "Pre-Pay" division of Verizon and he was certain that I couldn't do what I planned to do.  I was extremely disappointed as I had called Apple prior to buying the iPad and I read the algorhythm on the website for choosing an iPad before purchasing.  Those sources were quite specific and the information seemed clear.  I would be able to use my iPad to communicate through cellular connections while traveling on the road, literally, abroad.  I was told that I could pop in a data card wherever I was, just as you indicated in your message above, and voila I was good to go.  The Verizon rep definitively rained on that parade, but said that I might be able to do this if I have a "Post-Pay" account, a different area of Verizon.  I haven't had the chance to talk to this division yet, so I looked to Apple's Support for answers.  Maybe I will find out that I can use my iPad as an international communication device while traveling on the road afterall, however, it appears I may need a different type of account (Post-Pay), something I was never warned about. Can I switch to this kind of account?  I don't know.  I have to find out.  If you have any information about this issue, it would be good to share since I strongly suspect there are others who bought the iPad for the same purpose that I have.

  • How can I get the HTML codes in illustrator?

    Hi, I am a graphic designer, and I am getting into the web world, I wanna know how can I get the HTML codes to upload a web design made using Illustrator,...¡?Does any one know?Please let me know...

    everyone here is right, dreamweaver is better and you will need to understand html for this to work. HOWEVER, you can make a functional website using just illustrator and notepad (or text edit if you're on a mac).
    Design your site in illy, slice it up with the slice tool. http://s23.postimg.org/mv311kpp7/test_illy.jpg 
    Save for web and select html and images, you'll get an html file and an images folder. Open the HTML file in your text editing program and it will look like this: http://s10.postimg.org/f32nf6r2h/html_stuff.jpg   you'll have to know HTML codes but you can find tutorials online for most stuff, you'll just have to figure it out. In my fake site, i linked a button to google so i had to add <a href> tags to the code. http://s22.postimg.org/5avpadhch/a_href.jpg  save the html file and open it in your web browser, hopefully not IE. You can't tell in the picture but the middle button actually does link to google. http://s21.postimg.org/qd77slqmf/firefox.jpg

Maybe you are looking for

  • Now able to copy photos from PC to iPhone - Here is how it worked for me!

    This is a long one! Most of us come here for the first time looking for answers on how to do something or to find out what we or our iPhones are doing wrong. I've been looking and watching the threads for over a week on several questions I have, one

  • Regarding creation of an invoice/open-item via FB01 or F-22

    Hello All, I was trying to post an invoice/open item in a customer's account. I used the transaction code fb01 or we can also use f-22 for the same. I was confused regarding what posting keys to use to have a debit and a credit entry while creating a

  • Data Retrieval from Cluster Table - BSEG

    Hi all, I need to retreive data related to document line items from BSEG whose CLEARING DATE (AUGDT) is greater than a user given date for TWO COMPANY CODES (say 0010/0200). as BSEG is a cluster table, it has huge data and taking large amt of time ca

  • How to Find references to a method or a constant?

    I want to programmatically find the references to a method or a constant defined in a class. For example, in Eclipse you can right click on a class, select 'References', and you can get a list of all the places throughout your code that references th

  • Display .doc file in new window by url

    Hi all, I hope someone got a quick an easy solution for this one. I want to access and display (open/save) a .doc file in a new separate window by using createExternalWindow(docUrl, xxx, xxx), where docUrl is a path on the local webAS. Right now I ac