MY OUTPUT IS : CUSTOMER ID*MNEMONIC*NATIONALITY 100131*A0100131*PK CUSTOMER ID*MNEMONIC*NATIONALITY 100132*A0100132*PK
On Wed, Feb 27, 2013 at 5:42 PM, Naveed Ahmed Nayyar < [email protected]> wrote: > Dear Qaseemuddin, > > kindly send me the output because Niraj said to me again that his output > remain same. > > I have send him my output mentioned below; > > File AML.BP , Record 'FILE.TXT' > Insert 17:36:42 > Command-> > 0001 CUSTOMER ID*MNEMONIC*NATIONALITY > 0002 115628*A115628*PK > 0003 CUSTOMER ID*MNEMONIC*NATIONALITY > 0004 115629*A115629*PK > > > > > On Wed, Feb 27, 2013 at 5:40 PM, Qaseemuddin Shaikh <[email protected]>wrote: > >> Hope your fine. >> >> Rotuine is running OK! check your Customer data or in DEBUG MODE. >> >> On Wed, Feb 27, 2013 at 4:39 PM, Neeraj <[email protected]> wrote: >> >>> Dear Naveed >>> >>> Thanks for your mail. Here is code that i compiled after getting your >>> mail. >>> >>> >>> *----------------------------------------------------------------------------- >>> * <Rating>-37</Rating> >>> >>> >>> *----------------------------------------------------------------------------- >>> * SUBROUTINE CUS.DISPLAY.TEST >>> *** >>> PROGRAM CUS.DISPLAY.TEST >>> *** >>> $INSERT I_COMMON >>> $INSERT I_EQUATE >>> $INSERT I_F.CUSTOMER >>> *** >>> GOSUB INIT >>> GOSUB OPENFILES >>> GOSUB PROCESS >>> RETURN >>> ** >>> INIT: >>> FN.CUS = 'FBNK.CUSTOMER' >>> F.CUS = '' >>> Y.CUS.ID = '' >>> Y.MNEMONIC = '' >>> Y.NATIONALITY = '' >>> R.CUSTOMER = '' >>> CUS.ERR1 = '' >>> *** >>> * FN.EX = "TEST.EXTRACT" >>> * FV.EX = "" >>> * OPEN FN.EX TO FV.EX ELSE OPEN.ERROR = -1 >>> CUS.DATA = '' >>> CUS.DATA<-1> = "CUSTOMER ID*MNEMONIC*NATIONALITY" >>> RETURN >>> OPENFILES: >>> ***** >>> CALL OPF(FN.CUS,F.CUS) >>> RETURN >>> PROCESS: >>> *** >>> CRT "ENTER YOUR CUSTOMER ID :"; INPUT Y.CUS.ID >>> >>> CALL F.READ(FN.CUS,Y.CUS.ID,R.CUSTOMER,F.CUS,CUS.ERR1) >>> Y.MNEMONIC = R.CUSTOMER<EB.CUS.MNEMONIC> >>> Y.NATIONALITY = R.CUSTOMER<EB.CUS.NATIONALITY> >>> CUS.DATA<-1> = Y.CUS.ID:'*':Y.MNEMONIC:'*':Y.NATIONALITY >>> *** >>> * CRT "Customer Id: ":Y.CUS.ID >>> * CRT "Customer Mnemonic: ":Y.MNEMONIC >>> * CRT "Customer Nationality: ":Y.NATIONALITY >>> **** >>> *WRITE CUS.DATA TO FV.EX, "CUS.INFO" ON ERROR WRITE.ERR = -1 >>> >>> FOLDER.ID = "/dr/bnk/bnk.run/TEST.EXTRACT" >>> Y.FILE = "FILE.TXT" >>> OPENSEQ FOLDER.ID,Y.FILE TO F.EXT.ERR ELSE >>> CREATE F.EXT.ERR ELSE >>> STOP >>> END >>> END >>> >>> WRITESEQ CUS.DATA APPEND TO F.EXT.ERR ELSE >>> RETURN >>> RETURN >>> END >>> >>> >>> >>> ***************** >>> OUTPUT : >>> ------- >>> CUSTOMER ID*MNEMONIC*NATIONALITY >>> 01901135860017** >>> CUSTOMER ID*MNEMONIC*NATIONALITY >>> 01901635861017** >>> CUSTOMER ID*MNEMONIC*NATIONALITY >>> 01901975861517** >>> >>> ************************************ >>> >>> IT ONLY WRITE THE ID, BUT WE NEED MNEMONIC AND NATIONALITY ALSO. >>> PLEASE HELP ME WITH REQUIRED CODE. >>> >>> Thanks Once again. >>> >>> Regard >>> Niraj >>> >>> >>> >>> >>> On Wed, Feb 27, 2013 at 12:12 PM, Naveed Ahmed Nayyar < >>> [email protected]> wrote: >>> >>>> Hi Niraj, >>>> >>>> Hope you are doing well. >>>> >>>> You may use for append the data with this code. >>>> >>>> OPENSEQ FOLDER.ID,Y.FILE TO F.EXT.ERR ELSE >>>> CREATE F.EXT.ERR ELSE >>>> STOP >>>> END >>>> END >>>> >>>> WRITESEQ MY.DATA APPEND TO F.EXT.ERR ELSE >>>> >>>> Apply above code and update me if your issue will resolve. >>>> >>>> >>>> On Tue, Feb 26, 2013 at 9:40 AM, Neeraj <[email protected]> wrote: >>>> >>>>> HERE IS MY CODE >>>>> * SUBROUTINE CUS.DISPLAY.TEST >>>>> *** >>>>> PROGRAM CUS.DISPLAY.TEST >>>>> *** >>>>> $INSERT I_COMMON >>>>> $INSERT I_EQUATE >>>>> $INSERT I_F.CUSTOMER >>>>> *** >>>>> GOSUB INIT >>>>> GOSUB OPENFILES >>>>> GOSUB PROCESS >>>>> RETURN >>>>> ** >>>>> INIT: >>>>> FN.CUS = 'FBNK.CUSTOMER' >>>>> F.CUS = '' >>>>> Y.CUS.ID <http://y.cus.id/> = '' >>>>> Y.MNEMONIC = '' >>>>> Y.NATIONALITY = '' >>>>> R.CUSTOMER = '' >>>>> CUS.ERR1 = '' >>>>> *** >>>>> FN.EX = "FILE.EXTRACT" >>>>> FV.EX = "" >>>>> OPEN FN.EX TO FV.EX ELSE OPEN.ERROR = -1 >>>>> CUS.DATA = '' >>>>> CUS.DATA<-1> = "CUSTOMER ID*MNEMONIC*NATIONALITY" >>>>> RETURN >>>>> OPENFILES: >>>>> ***** >>>>> CALL OPF(FN.CUS,F.CUS) >>>>> RETURN >>>>> PROCESS: >>>>> *** >>>>> CRT "ENTER YOUR CUSTOMER ID :"; INPUT Y.CUS.ID <http://y.cus.id/> >>>>> >>>>> CALL F.READ(FN.CUS,Y.CUS.ID <http://y.cus.id/>,R. >>>>> CUSTOMER,F.CUS,CUS.ERR1) >>>>> Y.MNEMONIC = R.CUSTOMER<EB.CUS.MNEMONIC> >>>>> Y.NATIONALITY = R.CUSTOMER<EB.CUS.NATIONALITY> >>>>> CUS.DATA<-1> = Y.CUS.ID:'*':Y.MNEMONIC:'*':Y.NATIONALITY >>>>> *** >>>>> * CRT "Customer Id: ":Y.CUS.ID <http://y.cus.id/> >>>>> * CRT "Customer Mnemonic: ":Y.MNEMONIC >>>>> * CRT "Customer Nationality: ":Y.NATIONALITY >>>>> **** >>>>> WRITE CUS.DATA TO FV.EX, "CUS.INFO <http://cus.info/>" ON ERROR >>>>> WRITE.ERR = -1 >>>>> RETURN >>>>> RETURN >>>>> END >>>>> >>>>> >>>>> On Mon, Feb 25, 2013 at 8:06 PM, Kevin Powick <[email protected]>wrote: >>>>> >>>>>> >>>>>> On Monday, 25 February 2013 03:18:00 UTC-5, Neeraj wrote: >>>>>> >>>>>> How to Append Data to the End of Existing File using infobasic? >>>>>>> >>>>>> >>>>>> >>>>>> Append to the end of an existing file, or an existing record? Two >>>>>> different things in multivalue databases such as jBASE. You say "file", >>>>>> but you describe records. >>>>>> >>>>>> Show us your code and you're likely to get a more helpful reply than >>>>>> those already provided. >>>>>> >>>>>> -- >>>>>> Kevin Powick >>>>>> >>>>>> -- >>>>>> -- >>>>>> IMPORTANT: T24/Globus posts are no longer accepted on this forum. >>>>>> >>>>>> To post, send email to [email protected] >>>>>> To unsubscribe, send email to [email protected] >>>>>> For more options, visit this group at >>>>>> http://groups.google.com/group/jBASE?hl=en >>>>>> >>>>>> --- >>>>>> You received this message because you are subscribed to the Google >>>>>> Groups "jBASE" group. >>>>>> To unsubscribe from this group and stop receiving emails from it, >>>>>> send an email to [email protected]. >>>>>> For more options, visit https://groups.google.com/groups/opt_out. >>>>>> >>>>>> >>>>>> >>>>> >>>>> >>>>> >>>>> -- >>>>> With Regards, >>>>> Niraj >>>>> >>>>> -- >>>>> -- >>>>> IMPORTANT: T24/Globus posts are no longer accepted on this forum. >>>>> >>>>> To post, send email to [email protected] >>>>> To unsubscribe, send email to [email protected] >>>>> For more options, visit this group at >>>>> http://groups.google.com/group/jBASE?hl=en >>>>> >>>>> --- >>>>> You received this message because you are subscribed to the Google >>>>> Groups "jBASE" group. >>>>> To unsubscribe from this group and stop receiving emails from it, send >>>>> an email to [email protected]. >>>>> For more options, visit https://groups.google.com/groups/opt_out. >>>>> >>>>> >>>>> >>>> >>>> >>>> >>>> -- >>>> Thanks & Regards, >>>> -------------------------------- >>>> Naveed Ahmed Nayyar >>>> T24 Technical Consultant >>>> Phone: +923225734761 >>>> Email: [email protected] >>>> Temenos Core Banking Solution >>>> <[email protected]> >>>> >>>> -- >>>> -- >>>> IMPORTANT: T24/Globus posts are no longer accepted on this forum. >>>> >>>> To post, send email to [email protected] >>>> To unsubscribe, send email to [email protected] >>>> For more options, visit this group at >>>> http://groups.google.com/group/jBASE?hl=en >>>> >>>> --- >>>> You received this message because you are subscribed to the Google >>>> Groups "jBASE" group. >>>> To unsubscribe from this group and stop receiving emails from it, send >>>> an email to [email protected]. >>>> For more options, visit https://groups.google.com/groups/opt_out. >>>> >>>> >>>> >>> >>> >>> >>> -- >>> With Regards, >>> Niraj >>> >>> -- >>> -- >>> IMPORTANT: T24/Globus posts are no longer accepted on this forum. >>> >>> To post, send email to [email protected] >>> To unsubscribe, send email to [email protected] >>> For more options, visit this group at >>> http://groups.google.com/group/jBASE?hl=en >>> >>> --- >>> You received this message because you are subscribed to the Google >>> Groups "jBASE" group. >>> To unsubscribe from this group and stop receiving emails from it, send >>> an email to [email protected]. >>> For more options, visit https://groups.google.com/groups/opt_out. >>> >>> >>> >> >> >> >> -- >> Regards, >> Qaseem Uddin Shaikh >> _________________________________ >> Technical Consultant & Data Migration >> National Data Consultant Pvt Ltd >> Office telephone: +92 (21) 35842033 , +92 (21) 358245357 >> Mobile telephone: +92 (334) 9555668 , +92 (341) 2271202 >> email: [email protected], [email protected] >> Website: www.ndctech.net >> Banking technology consulting intelligence >> Skype id: qaseemshaikh >> > > > > -- > Thanks & Regards, > -------------------------------- > Naveed Ahmed Nayyar > T24 Technical Consultant > Phone: +923225734761 > Email: [email protected] > Temenos Core Banking Solution > <[email protected]> > -- Regards, Qaseem Uddin Shaikh _________________________________ Technical Consultant & Data Migration National Data Consultant Pvt Ltd Office telephone: +92 (21) 35842033 , +92 (21) 358245357 Mobile telephone: +92 (334) 9555668 , +92 (341) 2271202 email: [email protected], [email protected] Website: www.ndctech.net Banking technology consulting intelligence Skype id: qaseemshaikh -- -- IMPORTANT: T24/Globus posts are no longer accepted on this forum. To post, send email to [email protected] To unsubscribe, send email to [email protected] For more options, visit this group at http://groups.google.com/group/jBASE?hl=en --- You received this message because you are subscribed to the Google Groups "jBASE" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. For more options, visit https://groups.google.com/groups/opt_out.
