>>>>>>Hi,
>>>>>>
>>>>>>I forgot how or if it is possible to know which procedure called? For example, at run-time I want to write into a hidden log which procedure called this method/procedure?
>>>>>>
>>>>>>TIA
>>>>>
>>>>>PROGRAM()?
>>>>
>>>>Thank you. I think this is what I used before. Do I understand that I can assume 3 levels and do something like this:
>>>>PROGRAM(1)
>>>>PROGRAM(2)
>>>>PROGRAM(3)
>>>>?
>>>
>>>Sure.
>>
>>Is it possible that I am not getting result I expect because I run the app from the VFP IDE?
>>
>>Here is what I did for testing: I call method METHOD1 from method METHOD2. Then in METHOD1 I log Program(0) and Program(1) but they return the name of the Application file. And Program(2) returns the START call. I was hoping to see the name of METHOD2 in METHOD1 but I don't see it.
>>What am I missing?
>
>
>That works for me:
>
>CLEAR
>oTest = CREATEOBJECT("TestMe")
>
>oTest.Test1()
>
>
>DEFINE CLASS TestMe AS Custom
>
>FUNCTION Test1()
>? "Test1", PROGRAM(1)
>? "Test1", PROGRAM(2)
>? "Test1", PROGRAM(3)
>?
>this.Test2()
>RETURN
>
>
>FUNCTION Test2()
>? "Test2", PROGRAM(1)
>? "Test2", PROGRAM(2)
>? "Test2", PROGRAM(3)
>?
>this.Test3()
>RETURN
>
>FUNCTION Test3()
>? "Test3", PROGRAM(1)
>? "Test3", PROGRAM(2)
>? "Test3", PROGRAM(3)
>RETURN
>ENDDEFINE
>
>
>BTW Greg is right ASTACKINFO return more information than just PROGRAM()
Thank you for illustrating the correct use of the PROGRAM(). As far as ASTACKINFO(), I quickly looked in the help and didn't find more helpful information than in the PROGRAM. But I will review it again.
Thank you.
"The creative process is nothing but a series of crises." Isaac Bashevis Singer
"My experience is that as soon as people are old enough to know better, they don't know anything at all." Oscar Wilde
"If a nation values anything more than freedom, it will lose its freedom; and the irony of it is that if it is comfort or money that it values more, it will lose that too." W.Somerset Maugham