#! /usr/bin/awk -f

# k6h2psql.awk
# Jorge Fco. Ricarte Lopez                              
# Mon Oct 15 17:06:50 MDT 2007
# jorgericarte@asuni.com.mx
# Ultimo cambio: Mon 15 Oct 2007 08:33:50 PM MDT
# Kardex historico de seis ultimos meses

BEGIN {
FS=":"
"date +%Y%m%d" | getline mHoy
INSFAC="( kh_gpo, kh_numpar, kh_descrip, kh_tipo, kh_univen1, kh_unicom1, kh_univen2, kh_cosven2, kh_impven2, kh_unicom2, kh_coscom2, kh_univen3, kh_cosven3, kh_impven3, kh_unicom3, kh_coscom3, kh_univen4, kh_cosven4, kh_impven4, kh_unicom4, kh_coscom4, kh_univen5, kh_cosven5, kh_impven5, kh_unicom5, kh_coscom5, kh_univen6, kh_cosven6, kh_impven6, kh_unicom6, kh_coscom6 )"
CI=2
CF=32
m1=""
}

function fDate(fEsDat)
{
  if (fEsDat==" " || fEsDat=="") { fEsDat=mHoy }
  lnum=sprintf(",'%s'",fEsDat)   
  return lnum
}

function fNumero(fEsNum)
{
  if (fEsNum==0 || fEsNum==" " || fEsNum=="" ) { fEsNum=0 }
  lnum=sprintf(",%s",fEsNum)   
  return lnum
}

function fCualEs(fNamFld,fValFld) 
{
#  print ("'")(fNamFld)("' -- '")(fValFld)("'")
  lval=""
  if (fNamFld=="Grupo      ") { lval=sprintf("'%s'",fValFld)  }
  if (fNamFld=="Num parte  ") { lval=sprintf(",'%s'",fValFld) } 
  if (fNamFld=="Descrip    ") { lval=sprintf(",'%s'",fValFld) } 
  if (fNamFld=="Tipo       ") { lval=sprintf(",'%s'",fValFld) } 
  if (fNamFld=="Uni ven 1  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni com 1  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos com 1  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni ven 2  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos ven 2  ") { lval=fNumero(fValFld) }
  if (fNamFld=="Imp ven 2  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni com 2  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos com 2  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni ven 3  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos ven 3  ") { lval=fNumero(fValFld) }
  if (fNamFld=="Imp ven 3  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni com 3  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos com 3  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni ven 4  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos ven 4  ") { lval=fNumero(fValFld) }
  if (fNamFld=="Imp ven 4  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni com 4  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos com 4  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni ven 5  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos ven 5  ") { lval=fNumero(fValFld) }
  if (fNamFld=="Imp ven 5  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni com 5  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos com 5  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni ven 6  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos ven 6  ") { lval=fNumero(fValFld) }
  if (fNamFld=="Imp ven 6  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Uni com 6  ") { lval=fNumero(fValFld) } 
  if (fNamFld=="Cos com 6  ") { lval=fNumero(fValFld) } 
  return lval
}

{
#  print NR,$1,$2
  fld=substr($2,2)
#  if (NR==CI-1) { 
#    m1=fCualEs($1,fld)
#    m1=("'")($2)("'") 
#    m1=sprintf("'%s'",fld)
#  }

#  if (NR>=CI && NR<=CF) { 
    m1=(m1)(fCualEs($1,fld))
#    m1=(m1)(",'")(fld)("'") 
#  }

  if (NR==CF+1) {
    CI=CI+32
    CF=CF+32
    mLinea=("INSERT INTO ")(K6M)(INSFAC)(" VALUES ( ")(m1)(" );")
    m1=""
    print mLinea
    if ( NR > 150 ) { exit }
  } 
#  print length($1),$1,length(fld),$2,length(lfld),lfld
}

END {
#print mHoy
}