Good evening Jafar,

Thanks. I suspect that it will require a change/addition to the runtime at this point. I have a slight workaround that does the job for the time being.

regards

Bruce Rennie

On 06/11/2013 12:53 PM, Jafar Al-Gharaibeh wrote:
Good morning Bruce,

It was early morning when I looked at your email. After I hit the send button I realized that I didn't answer your question. I didn't have an answer at the top of my head so I left it for contributions from others. It seemed to me that it must be easy since this piece of information is available with runtime errors. However, not sure if it is accessible at the language level.

Clint might have a quick answer since he is the "execution monitoring" master mind.

Cheers,
Jafar



On Mon, Jun 10, 2013 at 8:35 PM, Bruce & Breeanna Rennie <bren...@dcsi.net.au <mailto:bren...@dcsi.net.au>> wrote:

    Good morning Jafar,

    I wasn't clear in my request. I want something like.

    procedure whatchamacallit(d,f)
        local nmstr
        nmstr := whatismycurrentname()
        write("the name of the current procedure is ", nmstr)
    end

    would print

    the name of the current procedure is whatchamacallit

    I can get a list of the static or paramater variables using
    staticnames() or paramnames(&current). I can get the current
    procedure level with &level. I can get the current line number by
    &line, etc. If there is not a way to do this, I'll add it to my
    list of things to look at later.

    regards

    Bruce Rennie


    On 06/11/2013 12:07 AM, Jafar Al-Gharaibeh wrote:
    Here is one way to do it:

    procedure pname(p)
     image(p) ? { ="procedure "; return tab(0)}
    end


    and here is a program that uses it:

    procedure main()
     write(pname(foo))
     x:=foo
     write(pname(x))
    end
    procedure foo()
    end


    Cheers,
    Jafar



    On Mon, Jun 10, 2013 at 4:39 AM, Bruce & Breeanna Rennie
    <bren...@dcsi.net.au <mailto:bren...@dcsi.net.au>> wrote:

        To all,

        I hope this is simple. Is there a function that will return
        the name of
        the currently executing procedure as a string?

        regards

        Bruce Rennie

        
------------------------------------------------------------------------------
        How ServiceNow helps IT people transform IT departments:
        1. A cloud service to automate IT design, transition and
        operations
        2. Dashboards that offer high-level views of enterprise services
        3. A single system of record for all IT processes
        http://p.sf.net/sfu/servicenow-d2d-j
        _______________________________________________
        Unicon-group mailing list
        Unicon-group@lists.sourceforge.net
        <mailto:Unicon-group@lists.sourceforge.net>
        https://lists.sourceforge.net/lists/listinfo/unicon-group




    
------------------------------------------------------------------------------
    How ServiceNow helps IT people transform IT departments:
    1. A cloud service to automate IT design, transition and operations
    2. Dashboards that offer high-level views of enterprise services
    3. A single system of record for all IT processes
    http://p.sf.net/sfu/servicenow-d2d-j


    _______________________________________________
    Unicon-group mailing list
    Unicon-group@lists.sourceforge.net  
<mailto:Unicon-group@lists.sourceforge.net>
    https://lists.sourceforge.net/lists/listinfo/unicon-group


    
------------------------------------------------------------------------------
    This SF.net email is sponsored by Windows:

    Build for Windows Store.

    http://p.sf.net/sfu/windows-dev2dev
    _______________________________________________
    Unicon-group mailing list
    Unicon-group@lists.sourceforge.net
    <mailto:Unicon-group@lists.sourceforge.net>
    https://lists.sourceforge.net/lists/listinfo/unicon-group




------------------------------------------------------------------------------
This SF.net email is sponsored by Windows:

Build for Windows Store.

http://p.sf.net/sfu/windows-dev2dev


_______________________________________________
Unicon-group mailing list
Unicon-group@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/unicon-group

------------------------------------------------------------------------------
This SF.net email is sponsored by Windows:

Build for Windows Store.

http://p.sf.net/sfu/windows-dev2dev
_______________________________________________
Unicon-group mailing list
Unicon-group@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/unicon-group

Reply via email to