Talk About Network

Google


Register and Login
Nick
Password
Register create new account Sign up is FREE and you can post replies, new topics, bookmark posts and more!
Recover lost password


Programming > Awk > need a hint to ...
Latest [ Topics | Posts ] Archive Post A New Topic Post a Reply
<< Topic < Post Post 1 of 7 Topic 2109 of 2317
Post > Topic >>

need a hint to tweak an algorithm

by Atropo <lxvasquez@[EMAIL PROTECTED] > Dec 21, 2007 at 11:25 AM

I have this file-re****t I'll put an * at the begining of each line

*211CODCBSOI102    000000002
 
CODETEL                                              PAGE:          1
*RE****T ID: CBSOI102                                  SERVICE ORDER
EXCEPTIONS                                       REF:
*PROCESSING DATE/TIME: 11/10/07
22:36:12                                                         DIST
CODE:
*ACTIVITY DATE: 11/10/07
*SOCC: 6001
*STATE: RD
*LOCN     TEL NO       ACCT NO       MSD
NAME                            CL/SVC
*1110  809-536-0286                03/07/07       AMIAMA,
TIO                     R   1
* ORDER NO CATEGORY   PROD/SVC          QTY         AMOUNT     ERROR
DATA
* C0260990 CBSZTNC1                       1.00           0.00
CBSZTNC1:TELEPHONE-NO    =8095360286
*                 DESC: CBSM0301       ATTEMPT TO UPDATE ACCOUNT,
ACCOUNT MISSING
* C0260993 CBSZTNC1                       1.00           0.00
CBSZTNC1:TELEPHONE-NO    =8095360286
*                 DESC: CBSM0301       ATTEMPT TO UPDATE ACCOUNT,
ACCOUNT MISSING
* C0260993 TNC CHANGE                     1.00           0.00
CBSZTNC1:632070307071110      111008095360286C^B-r^Z     M303 B
1
*                 DESC: CBSM0301       ATTEMPT TO UPDATE ACCOUNT,
ACCOUNT MISSING
*-----------------------------------------------------------------------------------------------------------------------------
-------
*LOCN     TEL NO       ACCT NO       MSD
NAME                            CL/SVC
*1040  809-569-4760   4650154707   05/23/00   PEREZ PEREZ,DIULKA
CRISTINA     R  1
* ORDER NO CATEGORY   PROD/SVC          QTY         AMOUNT     ERROR
DATA
* O0176330 TNC CHANGE                     1.00           0.00
CBSZTNC1:641000523071110     Z104008095694760O^A??^O     M309 R
1
*                 DESC: CBSM2153       ACCT TERM DATE PRIOR TO TERM
DATE OF TOLL GUIDE - ORDER REJECTED
* O0176330 CUST ACCT                      1.00           0.00
CBST0003:ACCT-TERMN-DATE =070807
*                 DESC: CBSM2153       ACCT TERM DATE PRIOR TO TERM
DATE OF TOLL GUIDE - ORDER REJECTED
*-----------------------------------------------------------------------------------------------------------------------------
-------
*ERRORS SUPPRESSED - NO. OF MESSAGES:         0
*TOTALS BY STATE   - NO. OF ACCOUNTS:         2     NO. OF
ERRORS:         5.00     *AMOUNT:            0.00
*ERRORS SUPPRESSED - NO. OF MESSAGES:         0
*TOTALS BY SOCC    - NO. OF ACCOUNTS:         2     NO. OF
ERRORS:         5.00     *AMOUNT:            0.00
*211CODCBSOI102    000000031
 
CODETEL                                              PAGE:          2
*RE****T ID: CBSOI102                                  SERVICE ORDER
EXCEPTIONS                                       REF:
*PROCESSING DATE/TIME: 11/10/07
22:36:12                                                         DIST
CODE:
*ACTIVITY DATE: 11/10/07
*SOCC:  6004
*STATE: RD
*LOCN     TEL NO       ACCT NO       MSD
NAME                            CL/SVC
*2190  809-739-0319   4618236493   10/03/02   BANCA
REAL                      B  SPL
* ORDER NO CATEGORY   PROD/SVC          QTY         AMOUNT     ERROR
DATA
* C0399446 PRDCT &SVC NRCBLOQUEO0Y1NE     1.00-          0.00
CBST0012:PRODSERV-TYP-CD =30  ,PROD-SVC-QLY-ID =       ,CLEC-ID
=
  *               DESC: CBSM0354       NO PRODUCT SERVICE ON ACCOUNT
TO REMOVE

my desire output will be:


6001 1110  809-536-0286                03/07/07       AMIAMA,
TIO                     R   1
C0260990 CBSZTNC1 CBSM0301
C0260993 CBSZTNC1 CBSM0301
C0260993 TNC CHANGE CBSM0301

6001 1040  809-569-4760   4650154707   05/23/00   PEREZ PEREZ,DIULKA
CRISTINA     R  1
O0176330 TNC CHANGE CBSM2153
O0176330 CUST ACCT    CBSM2153

6004 2190  809-739-0319   4618236493   10/03/02   BANCA
REAL                      B  SPL
C0399446 PRDCT &SVC NRCBLOQUEO0Y1NE    CBSM0354

this is what i've done so far:

/^RE****T ID/ { next }
/^ACTIVITY DATE/ { next }
/^STATE/ { next }
/^----------------------/ { next }
/^ERRORS SUPPRESSED/ { next }
/^TOTALS BY STATE/ { next }
/^ERRORS SUPPRESSED/ { next }
/^TOTALS BY SOCC/ { next }
!NF {next}
/^LOCN/ { next }
$1 ~ /ORDER/ {next}

/^SOCC/ {socc=$2;next }

    {printf "%s%s%s\n",socc,$0,"##"}

/^[ ]/ {
          tratamiento=substr($0,1,38)

         {printf "%s%s\n",tratamiento,"$$"}

         }
$1 ~ "DESC:"  {
           error=$2
          printf "%s%s\n",error,"%%" }
...

this is the output i get with this script:  I'll put an * at the
begining of each line

*6001 1110  809-536-0286                03/07/07 AMIAMA,
TIO                     R   1##
*6001 C0260990 CBSZTNC1                       1.00           0.00
CBSZTNC1:TELEPHONE-NO    =8095360286##
* C0260990 CBSZTNC1                    $$
*6001DESC: CBSM0301       ATTEMPT TO UPDATE ACCOUNT, ACCOUNT MISSING##
*                 DESC: CBSM0301       $$
*CBSM0301%%
*6001C0260993 CBSZTNC1                       1.00           0.00
CBSZTNC1:TELEPHONE-NO    =8095360286##
* C0260993 CBSZTNC1                    $$
*                 DESC: CBSM0301       ATTEMPT TO UPDATE ACCOUNT,
ACCOUNT MISSING##
*                 DESC: CBSM0301       $$
*CBSM0301%%
* C0260993 TNC CHANGE                     1.00           0.00
CBSZTNC1:632070307071110      111008095360286C^B-r^Z     M303 B 1##
* C0260993 TNC CHANGE                  $$
*                 DESC: CBSM0301       ATTEMPT TO UPDATE ACCOUNT,
ACCOUNT MISSING##
*                 DESC: CBSM0301       $$
*CBSM0301%%
*1040  809-569-4760   4650154707   05/23/00   PEREZ PEREZ,DIULKA
CRISTINA     R  1##
* O0176330 TNC CHANGE                     1.00           0.00
CBSZTNC1:641000523071110     Z104008095694760O^A??^O     M309 R1##
* O0176330 TNC CHANGE                  $$
*                 DESC: CBSM2153       ACCT TERM DATE PRIOR TO TERM
DATE OF TOLL *GUIDE - ORDER REJECTED##
*                 DESC: CBSM2153       $$
*CBSM2153%%
* O0176330 CUST ACCT                      1.00           0.00
CBST0003:ACCT-TERMN-DATE =070807##
* O0176330 CUST ACCT                   $$
*                 DESC: CBSM2153       ACCT TERM DATE PRIOR TO TERM
DATE OF TOLL *GUIDE - ORDER REJECTED##
*                 DESC: CBSM2153       $$
*CBSM2153%%
*60042190  809-739-0319   4618236493   10/03/02   BANCA
REAL                      B  SPL##
*6004 C0399446 PRDCT &SVC NRCBLOQUEO0Y1NE     1.00-          0.00
*CBST0012:PRODSERV-TYP-CD =30  ,PROD-SVC-QLY-ID =       ,CLEC-ID=##
* C0399446 PRDCT &SVC NRCBLOQUEO0Y1NE  $$
*6004                 DESC: CBSM0354       NO PRODUCT SERVICE ON
ACCOUNT TO REMOVE##
*                 DESC: CBSM0354       $$
*CBSM0354%%

sorry the mess,  could'nt find an easy example
 




 7 Posts in Topic:
need a hint to tweak an algorithm
Atropo <lxvasquez@[EMA  2007-12-21 11:25:21 
Re: need a hint to tweak an algorithm
Ed Morton <morton@[EMA  2007-12-23 05:04:12 
Re: need a hint to tweak an algorithm (SOLVED)
Atropo <lxvasquez@[EMA  2007-12-23 05:52:14 
Re: need a hint to tweak an algorithm (added new condition)
Atropo <lxvasquez@[EMA  2007-12-23 18:13:35 
Re: need a hint to tweak an algorithm (added new condition)
Ed Morton <morton@[EMA  2007-12-23 20:33:41 
Re: need a hint to tweak an algorithm (added new condition)
Atropo <lxvasquez@[EMA  2007-12-23 19:01:03 
Re: need a hint to tweak an algorithm (added new condition)
Ed Morton <morton@[EMA  2007-12-23 21:45:20 

Post A Reply:
  Go here to Signup

AddThis Feed Button


About - Advertising - Contact - Frequently Asked Questions - Privacy Policy - Terms of Use - Signup

Contact
tan12V112 Fri Jul 25 15:01:03 CDT 2008.