|
||||
1 : /* file: editdata.sub¢Ò 2 : ¢Ò 3 : ÁÖ¼Ò·Ï ÀÚ·á ÀÔ·Â/¼öÁ¤½Ã Ç׸ñ°ª ÆíÁý ºÎ ÇÁ·Î±×·¥ (author: ¼±¤Çö)¢Ò 4 : ¢Ò 5 : Copyright (c) 2001/02/22 by Wesoft¢Ò 6 : All Rights Reserved.¢Ò 7 : */¢Ò 8 : ¢Ò 9 : name= strchange(name, fch~"| ", rch~"|");¢Ò 10 : birth= strchange(lrtrim(birth), fch, rch);¢Ò 11 : hdphone= strchange(lrtrim(hdphone), fch, rch);¢Ò 12 : hphone= strchange(lrtrim(hphone), fch, rch);¢Ò 13 : hfax= strchange(lrtrim(hfax), fch, rch);¢Ò 14 : homepage= strchange(lrtrim(homepage), fch, rch);¢Ò 15 : email= strchange(lrtrim(email), fch, rch);¢Ò 16 : hzipcode= strchange(hzip1, fch, rch);¢Ò 17 : if(hzipcode!="") hzipcode~= "-" ~ strchange(hzip2, fch, rch);¢Ò 18 : haddr1= strchange(haddr1, fch, rch);¢Ò 19 : haddr2= strchange(lrtrim(haddr2), fch, rch);¢Ò 20 : office= strchange(lrtrim(office), fch, rch);¢Ò 21 : buseo= strchange(lrtrim(buseo), fch, rch);¢Ò 22 : position= strchange(lrtrim(position), fch, rch);¢Ò 23 : ophone= strchange(lrtrim(ophone), fch, rch);¢Ò 24 : ofax= strchange(lrtrim(ofax), fch, rch);¢Ò 25 : ozipcode= strchange(ozip1, fch, rch);¢Ò 26 : if(ozipcode!="") ozipcode~= "-" ~ strchange(ozip2, fch, rch);¢Ò 27 : oaddr1= strchange(oaddr1, fch, rch);¢Ò 28 : oaddr2= strchange(lrtrim(oaddr2), fch, rch);¢Ò 29 : memo= strchange(lrtrim(memo), fch, rch);¢Ò 30 : return;¢Ò |
||||
|