Ahh... well yea, that would explain the syntactical similarity. You
didn't say what kind of application it was in, and given that it was
posted to a CF mailing list I was sort of wondering. :)

This conditional makes me wonder if a woman wrote it:

If (WhereAmI = "INDIRECT") Then
       IamonTop = "Yes"
End If

:-D

> Actually, it's Siebel VB.


> On Wed, 9 Feb 2005 13:42:49 -0500, S. Isaac Dealey
> <[EMAIL PROTECTED]> wrote:
>> > I found this funny peice of code in the app I work with
>> > and thought
>> > I'd share it;
>>
>> > GetPositions:
>> >         WhereAmI = .GetFieldValue("Type")
>> >         If (WhereAmI = "DIRECT") Then
>> >                 IamaParent = "Yes"
>> >         End If
>> >         If (WhereAmI = "INDIRECT") Then
>> >                 IamonTop = "Yes"
>> >         End If
>> >         If (.NextRecord) Then
>> >                 GoTo GetPositions
>> >         End If
>>
>> > - Frank
>>
>> Are you aware that's an ASP subroutine?
>> At least that's what it looks like.
>> Looks horrid even for ASP.
>>
>> s. isaac dealey   954.927.5117
>> new epoch : isn't it time for a change?
>>
>> add features without fixtures with
>> the onTap open source framework


s. isaac dealey   954.927.5117
new epoch : isn't it time for a change?

add features without fixtures with
the onTap open source framework

http://macromedia.breezecentral.com/p49777853/
http://www.sys-con.com/story/?storyid=44477&DE=1
http://www.sys-con.com/story/?storyid=45569&DE=1
http://www.fusiontap.com




~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
Discover CFTicket - The leading ColdFusion Help Desk and Trouble 
Ticket application

http://www.houseoffusion.com/banners/view.cfm?bannerid=48

Message: http://www.houseoffusion.com/lists.cfm/link=i:5:146793
Archives: http://www.houseoffusion.com/cf_lists/threads.cfm/5
Subscription: http://www.houseoffusion.com/lists.cfm/link=s:5
Unsubscribe: http://www.houseoffusion.com/cf_lists/unsubscribe.cfm?user=89.70.5
Donations & Support: http://www.houseoffusion.com/tiny.cfm/54

Reply via email to