Limang dilang palaban - smug wun & lil blair & real one & oblak & qwerty
Friday, October 30, 2009
Sunday, October 25, 2009
From Wikipedia, the free encyclopedia
social networking website that is operated and privately owned by Facebook, Inc.[1] Users can add friends and send them messages, and update their personal profiles to notify friends about themselves. Additionally, users can join networks organized by city, workplace, school, and region. The website's name stems from the colloquial name of books given at the start of the academic year by university administrations with the intention of helping students get to know each other better.
Mark Zuckerberg founded Facebook with his college roommates and fellow computer science students Eduardo Saverin, Dustin Moskovitz and Chris Hughes while he was a student at Harvard University.[5] The website's membership was initially limited to Harvard students, but was expanded to other colleges in the Boston area, the Ivy League, and Stanford University. It later expanded further to include any university student, then high school students, and, finally, to anyone aged 13 and over. The website currently has more than 300 million active users worldwide.[6]
Facebook has met with some controversy. It has been blocked intermittently in several countries including Syria,[7] China[8] and Iran,[9] although Iran later unblocked Facebook in 2009. It has also been banned at many places of work to discourage employees from wasting time using the service.[10] Privacy has also been an issue, and it has been compromised several times. Facebook is also facing several lawsuits from a number of Zuckerberg's former classmates, who claim that Facebook had stolen their source code and other intellectual property.
A January 2009 Compete.com study has ranked Facebook as the most used social network by worldwide monthly active users, followed by MySpace.[11]
Facebook begginings
Saturday, October 24, 2009
Wednesday, October 21, 2009
Are you a Facebook addict?
Are you a Facebook addict? MANILA - Facebook users beware. Psychologists are now probing a new kind of addiction called Facebook Addiction Disorder (FAD).
Psychologist Dr. Michael Fenichel, who has published numerous writings on FAD online, describes it as a situation in which Facebook usage "overtakes" daily activities like waking up, getting dressed, using the telephone, or checking e-mail.
"The amazing thing is that, like cellphones, nobody seems to notice the vast amount of time and energy - at work, at home, and now while on the move - people are devoting to Facebook. It has become a given," Fenichel writes in an online post titled "Facebook Addiction Disorder- A New Challenge?"
FAD could be classified under the more broad "internet addiction disorder" or internet overuse.
Academic papers have already posed theories on internet addiction and social networking addiction, and even less, cellphone addiction.
"Like most activities, moderation and integration are key. Those that may seriously label and treat FAD as a behavioral addiction will clearly need to use context in determining if a behavior has become demonstrably harmful to overall social, work, or face-to-face interpersonal efficacy," Fenichel added.
You are a Facebook addict if...
According to Joanna Lipari, a clinical psychologist at the University of California, Los Angeles who was interviewed for a CNN report, here are some signs that you are addicted to Facebook:
1. You lose sleep over Facebook. When using Facebook becomes a compulsion and you spend entire nights logged on to the site, causing you to become tired the next day.
2. You spend more than an hour a day on Facebook. Lipari said it is difficult to define how much is too much when it comes to Facebook usage, but that an average person need only spend half an hour on the site.
3. You become obsessed with old loves or exes you reconnect with on Facebook.
4. You ignore work in favor of Facebook. This means you do not do your job in order to sneak time on Facebook.
5. The thought of getting off Facebook leaves you in cold sweat. If you try going a day without Facebook and it causes you stress and anxiety, this means you need help.
According to the same report by Elizabeth Cohen, Senior CNN Medical Correspondent, Facebook addiction is not yet an actual medical diagnosis.
However, the report notes that several therapists in the United States have noticed a rise in the number of clients who get hooked on social networking, to the point of social dysfunction.
Facebook fun
Facebook, launched by the world's youngest billionaire Mark Zuckerberg, has over 300 million users worldwide, half of whom log on to the site every day.
Further, about 2 billion photos and 14 million videos are uploaded on various Facebook pages a month and about 6 billion minutes are spent on Facebook a day, worldwide.
According to Willis Wee, founder of the social media and marketing blog Penn-Olson.com, this is twice as much time that people spend on Google.
The global social networking website allows users to post and share content (like photos, links, videos, and notes), play casual games and applications, and interact with friends and family through messaging and chat. abs-cbnNEWS.com. With reports from CNN.com.
Psychologist Dr. Michael Fenichel, who has published numerous writings on FAD online, describes it as a situation in which Facebook usage "overtakes" daily activities like waking up, getting dressed, using the telephone, or checking e-mail.
"The amazing thing is that, like cellphones, nobody seems to notice the vast amount of time and energy - at work, at home, and now while on the move - people are devoting to Facebook. It has become a given," Fenichel writes in an online post titled "Facebook Addiction Disorder- A New Challenge?"
FAD could be classified under the more broad "internet addiction disorder" or internet overuse.
Academic papers have already posed theories on internet addiction and social networking addiction, and even less, cellphone addiction.
"Like most activities, moderation and integration are key. Those that may seriously label and treat FAD as a behavioral addiction will clearly need to use context in determining if a behavior has become demonstrably harmful to overall social, work, or face-to-face interpersonal efficacy," Fenichel added.
You are a Facebook addict if...
According to Joanna Lipari, a clinical psychologist at the University of California, Los Angeles who was interviewed for a CNN report, here are some signs that you are addicted to Facebook:
1. You lose sleep over Facebook. When using Facebook becomes a compulsion and you spend entire nights logged on to the site, causing you to become tired the next day.
2. You spend more than an hour a day on Facebook. Lipari said it is difficult to define how much is too much when it comes to Facebook usage, but that an average person need only spend half an hour on the site.
3. You become obsessed with old loves or exes you reconnect with on Facebook.
4. You ignore work in favor of Facebook. This means you do not do your job in order to sneak time on Facebook.
5. The thought of getting off Facebook leaves you in cold sweat. If you try going a day without Facebook and it causes you stress and anxiety, this means you need help.
According to the same report by Elizabeth Cohen, Senior CNN Medical Correspondent, Facebook addiction is not yet an actual medical diagnosis.
However, the report notes that several therapists in the United States have noticed a rise in the number of clients who get hooked on social networking, to the point of social dysfunction.
Facebook fun
Facebook, launched by the world's youngest billionaire Mark Zuckerberg, has over 300 million users worldwide, half of whom log on to the site every day.
Further, about 2 billion photos and 14 million videos are uploaded on various Facebook pages a month and about 6 billion minutes are spent on Facebook a day, worldwide.
According to Willis Wee, founder of the social media and marketing blog Penn-Olson.com, this is twice as much time that people spend on Google.
The global social networking website allows users to post and share content (like photos, links, videos, and notes), play casual games and applications, and interact with friends and family through messaging and chat. abs-cbnNEWS.com. With reports from CNN.com.
Friday, October 16, 2009
Wednesday, October 14, 2009
Monday, October 12, 2009
Mga pics...
Wala lang... trip lang toh!!!
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
papalit sa 500 peso bill!!!
LOL
Mga gcrew o kainam.. ewan nga ba..
Saturday, October 10, 2009
Dbase utility prog comparing AgingBase.dbf with AgingBaseWKS.dbf for Tagaytay Highlands
#include
clear
//20091010 - GMR!
//Tagaytay Highlands
// this program is a utility to check/compare values of AgingBase.dbf with AgingBaseWKS.dbf
/*
Example:
AgingBase.dbf
MemAcctID TranDate Amount
50 08/31/2009 1000.00
50 06/30/2009 1500.00
50 05/31/2009 100.00
75 08/31/2009 2000.00
75 07/31/2009 300.00
75 06/30/2009 100.00
75 05/31/2009 2300.00
75 04/30/2009 3000.00
75 03/31/2009 1000.00
AgingBaseWKS.dbf
MemAcctID Current 30Days 60Days 90Days 120Days Over120
50 1000.00 0.00 1500.00 100.00 0.00 0.00
75 2000.00 300.00 100.00 2300.00 3000.00 1000.00
Assumptions/Remarks:
if trandate not found in AgingBase, Fields in AgingBaseWKS should be equal to 0.00
re: AGINGBase MemAcctID Trandate AgingWKS
50 07/31/2009 30Days = 0.00
50 04/30/2009 120Days = 0.00
50 03/31/2009 Over120 = 0.00
//Dependecies:
dateex.cc
UtilCompareAging.dbf
*/
//SET Additional Tools:
set proc to dateex.cc additive // this proc is used to easily manipulate
// dates based on DUFLP
dateex = new dateex() // init var
? dateex.ldom(date()) // get last date of the month - testing only
//SET Variables:
dYear = 2009// Year(date()) or date set by user //ex. 2009
dCurrent = "08/31/2009" //current date or date set by user //ex. 08/31/2009
dMonth = month(ctod(dCurrent))
do case
case (dMonth - 1) <= 0
d30 = dateex.ldom (ctod((dMonth - 1) + 12 + "/01/" + dYear)) //ex. 07/31/2009
case (dMonth - 1) > 0
d30 = dateex.ldom (ctod(dMonth - 1 + "/01/" + dYear)) //ex. 07/31/2009
endcase
do case
case (dMonth - 2) <= 0
d60 = dateex.ldom (ctod((dMonth - 2) + 12 + "/01/" + dYear)) //ex. 06/30/2009
case (dMonth - 2) > 0
d60 = dateex.ldom (ctod(dMonth - 2 + "/01/" + dYear)) //ex. 06/30/2009
endcase
do case
case (dMonth - 3) <= 0
d90 = dateex.ldom (ctod((dMonth - 3) + 12 + "/01/" + dYear)) //ex. 05/31/2009
case (dMonth - 3) > 0
d90 = dateex.ldom (ctod(dMonth - 3 + "/01/" + dYear)) //ex. 05/31/2009
endcase
do case
case (dMonth - 4) <= 0
d120 = dateex.ldom (ctod((dMonth - 4) + 12 + "/01/" + dYear)) //ex. 04/30/2009
case (dMonth - 4) > 0
d120 = dateex.ldom (ctod(dMonth - 4 + "/01/" + dYear)) //ex. 04/30/2009
endcase
do case
case (dMonth - 5) <= 0
dOver120 = dateex.ldom (ctod((dMonth - 5) + 12 + "/01/" + dYear)) //ex. 03/31/2009
case (dMonth - 5) > 0
dOver120 = dateex.ldom (ctod(dMonth - 5 + "/01/" + dYear)) //ex. 03/31/2009
endcase
// /01/ because every first day of the month starts with 1 - LOL!
dTHIGCI = new database()
dTHIGCI.databaseName := DATABASE_ALIAS // from Settings.h
dTHIGCI.active := true
//set AgingBase
qAgingBase = new query()
with (qAgingBase)
database := dTHIGCI
sql := [SELECT * FROM AgingBase]
active := true
endwith
rAgingBase = qAgingBase.rowset
fAgingBase = rAgingBase.fields
with (rAgingBase)
indexName = "MemAcctID"
endwith
//set AgingBaseWKS
qAgingBaseWKS = new query()
with (qAgingBaseWKS)
database := dTHIGCI
sql := [SELECT * ;
FROM AgingBaseWKS ]
active := true
endwith
rAgingBaseWKS = qAgingBaseWKS.rowset
fAgingBaseWKS = rAgingBaseWKS.fields
with (rAgingBaseWKS)
masterRowset = rAgingBase
indexName = "MemAcctID"
endwith
//reset utilcompareaging table
dTHIGCI.emptyTable("UtilCompareAging")
dTHIGCI.packTable("UtilCompareAging")
//set UtilCompareAging
qUCA = new query()
with (qUCA)
database := dTHIGCI
sql := [SELECT * ;
FROM UtilCompareAging ]
active := true
endwith
rUCA = qUCA.rowset
fUCA = rUCA.fields
rAgingBase.first()
rAgingBaseWKS.first()
for i = 1 to rAgingBase.count()
if rAgingBaseWKS.findkey(fAgingBase["MemAcctID"].value)
//check here by date
do case
//current
case fAgingBase["Trandate"].value = dCurrent
if fAgingBase["Amount"].value <> fAgingBaseWKS["current"].value
? "Current: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["current"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["Current"].value
fUCA["Aging"].value = "Current"
rUCA.save()
endif
//30 days
case fAgingBase["Trandate"].value = d30
if fAgingBase["Amount"].value <> fAgingBaseWKS["30Days"].value
? "30Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["30days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["30Days"].value
fUCA["Aging"].value = "30Days"
rUCA.save()
endif
//60 days
case fAgingBase["Trandate"].value = d60
if fAgingBase["Amount"].value <> fAgingBaseWKS["60Days"].value
? "60Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["60days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["60Days"].value
fUCA["Aging"].value = "60Days"
rUCA.save()
endif
//90 days
case fAgingBase["Trandate"].value = d90
if fAgingBase["Amount"].value <> fAgingBaseWKS["90Days"].value
? "90Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["90days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["90Days"].value
fUCA["Aging"].value = "90Days"
rUCA.save()
endif
//120 days
case fAgingBase["Trandate"].value = d120
if fAgingBase["Amount"].value <> fAgingBaseWKS["120Days"].value
? "120Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["120days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["120Days"].value
fUCA["Aging"].value = "120Days"
rUCA.save()
endif
//over120 days
case fAgingBase["Trandate"].value = dOver120
if fAgingBase["Amount"].value <> fAgingBaseWKS["Over120"].value
? "Over120: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["over120"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["Over120"].value
fUCA["Aging"].value = "Over120"
rUCA.save()
endif
endcase
//check here content of AgingBaseWKS if it has 0.00 value
//upon which no record should have been appended to
//Aging base in relation to aging which has 0.00 value
do case
case fAgingBaseWKS["Current"].value = 0.00 AND fAgingBase["Trandate"].value = dcurrent
? "Current: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["current"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["30Days"].value = 0.00 AND fAgingBase["Trandate"].value = d30
? "30Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["30Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["60Days"].value = 0.00 AND fAgingBase["Trandate"].value = d60
? "60Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["60Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["90Days"].value = 0.00 AND fAgingBase["Trandate"].value = d90
? "90Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["90Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["120Days"].value = 0.00 AND fAgingBase["Trandate"].value = d120
? "120Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["120Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["Over120"].value = 0.00 AND fAgingBase["Trandate"].value = dOver120
? "Over120: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["Over120"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
endcase
else
? fAgingBaseWKS["MemAcctID"].value // check what memacctID has been saved in AgingBaseWKS
//that is not present in AgingBASE
endif
rAgingBase.next()
endfor
? "AgingBase RecordCount: " + chr(9) + chr(9) +rAgingBase.count()
? "AgingBaseWKS RecordCount:" + chr(9) +rAgingBaseWKS.count()
qAgingBase.active = false
qAgingBaseWKS.active = false
qUCA.active = false
dTHIGCI.active = false
clear
//20091010 - GMR!
//Tagaytay Highlands
// this program is a utility to check/compare values of AgingBase.dbf with AgingBaseWKS.dbf
/*
Example:
AgingBase.dbf
MemAcctID TranDate Amount
50 08/31/2009 1000.00
50 06/30/2009 1500.00
50 05/31/2009 100.00
75 08/31/2009 2000.00
75 07/31/2009 300.00
75 06/30/2009 100.00
75 05/31/2009 2300.00
75 04/30/2009 3000.00
75 03/31/2009 1000.00
AgingBaseWKS.dbf
MemAcctID Current 30Days 60Days 90Days 120Days Over120
50 1000.00 0.00 1500.00 100.00 0.00 0.00
75 2000.00 300.00 100.00 2300.00 3000.00 1000.00
Assumptions/Remarks:
if trandate not found in AgingBase, Fields in AgingBaseWKS should be equal to 0.00
re: AGINGBase MemAcctID Trandate AgingWKS
50 07/31/2009 30Days = 0.00
50 04/30/2009 120Days = 0.00
50 03/31/2009 Over120 = 0.00
//Dependecies:
dateex.cc
UtilCompareAging.dbf
*/
//SET Additional Tools:
set proc to dateex.cc additive // this proc is used to easily manipulate
// dates based on DUFLP
dateex = new dateex() // init var
? dateex.ldom(date()) // get last date of the month - testing only
//SET Variables:
dYear = 2009// Year(date()) or date set by user //ex. 2009
dCurrent = "08/31/2009" //current date or date set by user //ex. 08/31/2009
dMonth = month(ctod(dCurrent))
do case
case (dMonth - 1) <= 0
d30 = dateex.ldom (ctod((dMonth - 1) + 12 + "/01/" + dYear)) //ex. 07/31/2009
case (dMonth - 1) > 0
d30 = dateex.ldom (ctod(dMonth - 1 + "/01/" + dYear)) //ex. 07/31/2009
endcase
do case
case (dMonth - 2) <= 0
d60 = dateex.ldom (ctod((dMonth - 2) + 12 + "/01/" + dYear)) //ex. 06/30/2009
case (dMonth - 2) > 0
d60 = dateex.ldom (ctod(dMonth - 2 + "/01/" + dYear)) //ex. 06/30/2009
endcase
do case
case (dMonth - 3) <= 0
d90 = dateex.ldom (ctod((dMonth - 3) + 12 + "/01/" + dYear)) //ex. 05/31/2009
case (dMonth - 3) > 0
d90 = dateex.ldom (ctod(dMonth - 3 + "/01/" + dYear)) //ex. 05/31/2009
endcase
do case
case (dMonth - 4) <= 0
d120 = dateex.ldom (ctod((dMonth - 4) + 12 + "/01/" + dYear)) //ex. 04/30/2009
case (dMonth - 4) > 0
d120 = dateex.ldom (ctod(dMonth - 4 + "/01/" + dYear)) //ex. 04/30/2009
endcase
do case
case (dMonth - 5) <= 0
dOver120 = dateex.ldom (ctod((dMonth - 5) + 12 + "/01/" + dYear)) //ex. 03/31/2009
case (dMonth - 5) > 0
dOver120 = dateex.ldom (ctod(dMonth - 5 + "/01/" + dYear)) //ex. 03/31/2009
endcase
// /01/ because every first day of the month starts with 1 - LOL!
dTHIGCI = new database()
dTHIGCI.databaseName := DATABASE_ALIAS // from Settings.h
dTHIGCI.active := true
//set AgingBase
qAgingBase = new query()
with (qAgingBase)
database := dTHIGCI
sql := [SELECT * FROM AgingBase]
active := true
endwith
rAgingBase = qAgingBase.rowset
fAgingBase = rAgingBase.fields
with (rAgingBase)
indexName = "MemAcctID"
endwith
//set AgingBaseWKS
qAgingBaseWKS = new query()
with (qAgingBaseWKS)
database := dTHIGCI
sql := [SELECT * ;
FROM AgingBaseWKS ]
active := true
endwith
rAgingBaseWKS = qAgingBaseWKS.rowset
fAgingBaseWKS = rAgingBaseWKS.fields
with (rAgingBaseWKS)
masterRowset = rAgingBase
indexName = "MemAcctID"
endwith
//reset utilcompareaging table
dTHIGCI.emptyTable("UtilCompareAging")
dTHIGCI.packTable("UtilCompareAging")
//set UtilCompareAging
qUCA = new query()
with (qUCA)
database := dTHIGCI
sql := [SELECT * ;
FROM UtilCompareAging ]
active := true
endwith
rUCA = qUCA.rowset
fUCA = rUCA.fields
rAgingBase.first()
rAgingBaseWKS.first()
for i = 1 to rAgingBase.count()
if rAgingBaseWKS.findkey(fAgingBase["MemAcctID"].value)
//check here by date
do case
//current
case fAgingBase["Trandate"].value = dCurrent
if fAgingBase["Amount"].value <> fAgingBaseWKS["current"].value
? "Current: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["current"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["Current"].value
fUCA["Aging"].value = "Current"
rUCA.save()
endif
//30 days
case fAgingBase["Trandate"].value = d30
if fAgingBase["Amount"].value <> fAgingBaseWKS["30Days"].value
? "30Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["30days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["30Days"].value
fUCA["Aging"].value = "30Days"
rUCA.save()
endif
//60 days
case fAgingBase["Trandate"].value = d60
if fAgingBase["Amount"].value <> fAgingBaseWKS["60Days"].value
? "60Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["60days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["60Days"].value
fUCA["Aging"].value = "60Days"
rUCA.save()
endif
//90 days
case fAgingBase["Trandate"].value = d90
if fAgingBase["Amount"].value <> fAgingBaseWKS["90Days"].value
? "90Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["90days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["90Days"].value
fUCA["Aging"].value = "90Days"
rUCA.save()
endif
//120 days
case fAgingBase["Trandate"].value = d120
if fAgingBase["Amount"].value <> fAgingBaseWKS["120Days"].value
? "120Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["120days"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["120Days"].value
fUCA["Aging"].value = "120Days"
rUCA.save()
endif
//over120 days
case fAgingBase["Trandate"].value = dOver120
if fAgingBase["Amount"].value <> fAgingBaseWKS["Over120"].value
? "Over120: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["over120"].value + chr(9) + chr(9) + fAgingBase["amount"].value//test only
rUCA.beginAppend()
fUCA["ABMemAcctID"].value = fAgingBase["MemAcctID"].value
fUCA["ABTranDate"].value = fAgingBase["Trandate"].value
fUCA["ABAmount"].value = fAgingBase["Amount"].value
fUCA["ABWMemAcctID"].value = fAgingBaseWKS["MemAcctID"].value
fUCA["ABWAmount"].value = fAgingBaseWKS["Over120"].value
fUCA["Aging"].value = "Over120"
rUCA.save()
endif
endcase
//check here content of AgingBaseWKS if it has 0.00 value
//upon which no record should have been appended to
//Aging base in relation to aging which has 0.00 value
do case
case fAgingBaseWKS["Current"].value = 0.00 AND fAgingBase["Trandate"].value = dcurrent
? "Current: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["current"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["30Days"].value = 0.00 AND fAgingBase["Trandate"].value = d30
? "30Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["30Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["60Days"].value = 0.00 AND fAgingBase["Trandate"].value = d60
? "60Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["60Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["90Days"].value = 0.00 AND fAgingBase["Trandate"].value = d90
? "90Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["90Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["120Days"].value = 0.00 AND fAgingBase["Trandate"].value = d120
? "120Days: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["120Days"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
case fAgingBaseWKS["Over120"].value = 0.00 AND fAgingBase["Trandate"].value = dOver120
? "Over120: " + fAgingBase["MemAcctID"].value + chr(9) + fAgingBase["Trandate"].value + chr(9) + fAgingBaseWKS["Over120"].value + chr(9) + chr(9) + fAgingBase["amount"].value //test only
endcase
else
? fAgingBaseWKS["MemAcctID"].value // check what memacctID has been saved in AgingBaseWKS
//that is not present in AgingBASE
endif
rAgingBase.next()
endfor
? "AgingBase RecordCount: " + chr(9) + chr(9) +rAgingBase.count()
? "AgingBaseWKS RecordCount:" + chr(9) +rAgingBaseWKS.count()
qAgingBase.active = false
qAgingBaseWKS.active = false
qUCA.active = false
dTHIGCI.active = false
Thursday, October 8, 2009
Wednesday, October 7, 2009
A visit to Greenlands
It was another work visit at Tagaytay Highlands but all seem to be a vacation because entering the pave way of said facet will surely relax anybody's aching nerve as you will be welcomed with fresh and really cool ambiance.
Down to midlands, my workmate, Nikki, needs to enhance his developed Point-Of-Sale (POS) Software. Apparently, the Taal view gets nearer while landscapes are so awesome, portraits of which are worth more than a memento.
After having lunch at Midlands, we traversed around Greenlands, adjacent land development of Highlands. Passing by the winding roads, I was really captivated by the different magnificent architectural designs made for sure by brilliant architects since owners are from the elite society. Such homes include Mediterranean, European, American and Japanese-Inspired aesthetics to name a few. Near Lake view, owner of SM's home can be located. If you happen to see posters of SM residences, it has something to do with the latter.
Anyone among you who has happen to pass around Tarragon court, corner Chili already? We'll guess who's the owner of the home located in such.
Down to midlands, my workmate, Nikki, needs to enhance his developed Point-Of-Sale (POS) Software. Apparently, the Taal view gets nearer while landscapes are so awesome, portraits of which are worth more than a memento.
After having lunch at Midlands, we traversed around Greenlands, adjacent land development of Highlands. Passing by the winding roads, I was really captivated by the different magnificent architectural designs made for sure by brilliant architects since owners are from the elite society. Such homes include Mediterranean, European, American and Japanese-Inspired aesthetics to name a few. Near Lake view, owner of SM's home can be located. If you happen to see posters of SM residences, it has something to do with the latter.
Anyone among you who has happen to pass around Tarragon court, corner Chili already? We'll guess who's the owner of the home located in such.
It's Wowowee's host.
As of this post date, the home in front of it is for sale. Try deal.. email me and I'l tell you how much.. Architect of said home is Bryan Tan, according to the poster posted in front..
Thursday, October 1, 2009
Pincrest Village at Tagaytay Highlands
Gusto ko lamang pong i-share ang larawan ng Pinecrest Village kung saan dito ako kalimitang pinatitira ng boss q tuwing may overnight stay kami sa Tagaytay Highlands.
Pwede niyo pong tingnan ang kabuuan at kung paano makakapunta sa tagaytay highlands sa pamamagitan ng kanilang website:
http://www.tagaytayhighlands.com/
Salamat po.
Pinecrest Village
Pinecrest Village was Tagaytay Highlands' first residential project, meticulously designed to cater to the discriminating tastes of Highlands members. Renowned architects Pablo Antonio and Nonoy Hubilla artfully crafted wood and stone to evoke the look and feel of a remote, yet intimate Swiss-Alpine village. Pinecrest Village is exclusive to members of the Highlands and Midlands Golf and Country Clubs.
167 condominium units in one-, two-, and three-bedroom models
with floor areas ranging from 85 to 180 sq.m.
covering approximately four hectares and situated right next to the Highlands golf course hole number 2
spectacular views of Taal Lake, Laguna de Bay, Mount Makiling, Mount Banahaw and the Batangas countryside from every unit
All units outfitted with European-style fixtures
A gated community with 24-hour security
with individual parking lots
ample water supply through the privately-owned Tagaytay Highlands water system
with fire sprinklers system
whirlpool tub in every master's bedroom
24/7 emergency care unit
povided with 100% emergency power supply
telephone and cable television provisions
Launched in 1994
Pwede niyo pong tingnan ang kabuuan at kung paano makakapunta sa tagaytay highlands sa pamamagitan ng kanilang website:
http://www.tagaytayhighlands.com/
Salamat po.
Pinecrest Village
Pinecrest Village was Tagaytay Highlands' first residential project, meticulously designed to cater to the discriminating tastes of Highlands members. Renowned architects Pablo Antonio and Nonoy Hubilla artfully crafted wood and stone to evoke the look and feel of a remote, yet intimate Swiss-Alpine village. Pinecrest Village is exclusive to members of the Highlands and Midlands Golf and Country Clubs.
167 condominium units in one-, two-, and three-bedroom models
with floor areas ranging from 85 to 180 sq.m.
covering approximately four hectares and situated right next to the Highlands golf course hole number 2
spectacular views of Taal Lake, Laguna de Bay, Mount Makiling, Mount Banahaw and the Batangas countryside from every unit
All units outfitted with European-style fixtures
A gated community with 24-hour security
with individual parking lots
ample water supply through the privately-owned Tagaytay Highlands water system
with fire sprinklers system
whirlpool tub in every master's bedroom
24/7 emergency care unit
povided with 100% emergency power supply
telephone and cable television provisions
Launched in 1994
Subscribe to:
Posts (Atom)
