Search Photo  
RSS Feed Tuesday, July 07, 2015
  Home | Celebrity | Photo Gallery | Wallpapers | e-Card | Business | Entertainment | Education | Sports | Article | Video News | Forum
School, College, University, Institute, Institute, Coaching Center and other Education Institute of India
Education Directory | Results | Who is Who | Notes | Article | Tutorial | Information | Dictionary | News 
 
 CA Clipper | FoxPro |

 

News Flashपीबीएम अस्पताल पर 19 को पत्रकार करेंगे चर्चा | तेज दिमाग के लिए जरूरी है एकाग्रता, स्वस्थ शरीर, सकारात्मकता और दृढ़ता: चन्द्रा | भारतीय वास्‍तु शास्‍त्र पूरी तरह वैज्ञानिक एवम मानव जीवन के अनुकूल - सुतार | तेजस्वी सम्मान के आवेदन आमंत्रित | स्व पुरोहित की स्मृति मे होंगें विविध कार्यक्रम | 36 बटुकों का हुआ सामुहिक यज्ञोपवित | विधायक जोशी ने सामुदायिक भवन का किया शिलान्यास | सामूहिक यज्ञोपवित संस्कार की तैयारियां पूर्ण | मरूधरा ग्रामीण बैंक की पहली महिला शाखा | हरीश सृजनात्मक जीवन जीने वाले युवा |
FoxPro Tutorial & Source Code
* Author      : Team of Pelagian Softwares
* Date        : 29/03/2007
* Source      : rntable.prg
* Description : Program to rename a field in structure / table through coding


set talk off
set safe off
clear

do renField with "STUDENT",      "FAT_NAME", "F_NAME"

proc renField 
 
   para data2ch, oldfld, newfld
   field_ex=.n.
   use &data2ch
   if !type( oldfld ) = 'U'
    field_ex=.y.
   endI
   clos data
   
   if field_ex
    ?"Renaming Field",oldfld,"to",newfld,"in",data2ch
    USE &data2ch
    copy to Data.TXT for !dele() SDF
    COPY TO SEXT STRUCTURE EXTENDED
    use sext
    LOCA FOR UPPER(FIELD_NAME)=PADR(UPPER(oldfld),10)
    repl FIELD_NAME with newfld
    USE 

    CREATE TEMP FROM SEXT ALIAS cAlias
    USE 
    USE TEMP
    APPEND FROM DATA.TXT SDF
    clos data
    USE TEMP
    copy to &data2ch
    clos data
   else
    ?
    ?
    ?oldfld,"Field not found in",data2ch
   endI
   clos data

REturn .t.




Also download: database/student.dbf 
Category for FoxPro
Database
Financial
Mathametics
Screen
Search
Security
Sound
String

All right reserved by Khabarexpress.com
Contact Us | Archives | Sitemap | Can't see Hindi ? | News Ticker
Special Edition: Lakshchandi Mahayagya, Camel Festival 2007, Vartmaan Sahitya, Nagar Ek - Nazaare Anek, Bikaner Udyog Craft Mela
Our Network rajb2b.com | khabarexpress.com | uniqueidea.net | PelagianDictionary.com | hindinotes.com | hubVilla.com
Developed & Designed by Pelagian Softwares