Re: Available: SQR Tree Utility (Attempt 2)

[Ben Le <ble@PCC.EDU>]

Wayne,
I'd like to have one too. Thanks.
My e-mail: ble@pcc.edu

At 03:32 PM 1/6/98 -0800, you wrote:
>Hi there, Wayne!
>        I'd also like a copy of your Software.
>
>                Happy Computing,
>                Ken Gartman
>                Maryland, USA
>
>
>Wayne Ivory wrote:
>>
>> Since I posted my original message I've had a few replies and noticed the example I had pasted into the message got all scrunched together (I hate that - so much for WYSIWYG).  I'll try pasting it here using a different method - unfortunately I won't know if it works until after I've done it.  In case it doesn't, imagine a Windows-Explorer type display.
>>
>> TAX016AU.SQR
>>
>> 35    Init-DateTime ()
>> 36    Init-Number ()
>> 37    Init-Report (45)
>> 51        Stdapi-Init ()
>> 54        Prompt (1389)
>> 56        Select-Parameters ()
>> 57        Get-Values (1444)
>> 60        Process-Parameters (1413)
>> 1431          Format-DateTime ()
>> 1432          Format-DateTime ()
>> 61        Array-Init (100)
>> 38    Process-Main (135)
>> 145       Get-Group-Name (1338)
>> 146       Build-company-list (1260)
>> 1277          Get-Company-Data ()
>> 147       Get-Totals (157)
>> 169           Cmpny-State-Data (177)
>> 178               Pay-Earnings (192)
>> 223                   Get-PayGroup-Erncd (726)
>> 739                       Chk-Exempt-Erncd (771)
>>
>> ******** Original Message follows ****************
>> If anyone is interested I've written a Unix shell script that produces a Procedure-Call tree for an SQR program.  It shows which procedures call which procedures, the line they are called from, and the line the called procedure is on.  Here's a sample:
>>
>> TAX016AU.SQR
>>
>> 35    Init-DateTime ()
>> 36    Init-Number ()
>> 37    Init-Report (45)
>> 51        Stdapi-Init ()
>> 54        Prompt (1389)
>> 56        Select-Parameters ()
>> 57        Get-Values (1444)
>> 60        Process-Parameters (1413)
>> 1431          Format-DateTime ()
>> 1432          Format-DateTime ()
>> 61        Array-Init (100)
>> 38    Process-Main (135)
>> 145       Get-Group-Name (1338)
>> 146       Build-company-list (1260)
>> 1277          Get-Company-Data ()
>> 147       Get-Totals (157)
>> 169           Cmpny-State-Data (177)
>> 178               Pay-Earnings (192)
>> 223                   Get-PayGroup-Erncd (726)
>> 739                       Chk-Exempt-Erncd (771)
>>
>> If you'd like a copy send me an email.
>>
>> Wayne Ivory
>> Information Services
>> Westralian Sands Limited
>>
>> Wayne Ivory
>> Information Services
>> Westralian Sands Limited
>>
>>
>> !
>> !
>>
>> !
>> !
>
>
Ben

ITS - 977-4970
Mailto:ble@pcc.edu