Classe do Gilmer (combustivel\gas)

[Luiz Fernando]

Pessoal alguém conseguir fazer alteração na classe do Gilmer para produtos de combustivel e gás.

[gilmer]

Eu passo as alterações na segunda, preciso juntar as alterações

 

[Luiz Fernando]

Caso alguém precisar, as alterações foi coisa bem simples mesmo, ao envia os dados do item colocar o CST com o valor de 'S60' ao invés de '60'

 

   DATA vBCSTDest       INIT 0
   DATA vICMSSTDest     INIT 0
 

      ElseIf  cST == "60"
            aadd( axArray, {"ICMS60" , {}, 1  } ); nPos := len(axArray)
            aadd( axArray[nPos][2], {"orig"       , TVoNFeItem():New("N", 1, 1, 1 ,  ,,oItem:orig    ) }  )
            aadd( axArray[nPos][2], {"CST"        , TVoNFeItem():New("N", 1, 2, 2 ,  ,,oItem:cCST    ) }  )
            aadd( axArray[nPos][2], {"vBCSTRet"   , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCSTRet     ) }  )
            aadd( axArray[nPos][2], {"pST"        , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:pST     ) }  )
            aadd( axArray[nPos][2], {"vICMSSTRet" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vICMSSTRet   ) }  )
            aadd( axArray[nPos][2], {"vBCFCPSTRet", TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCFCPSTRET )  }  )
            aadd( axArray[nPos][2], {"pFCPSTRet"  , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pFCPSTRET   )  }  )
            aadd( axArray[nPos][2], {"vFCPSTRet"  , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vFCPSTRET   )  }  )
            aadd( axArray[nPos][2], {"pRedBCEfet" , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pRedBCEfet   )  }  )
            aadd( axArray[nPos][2], {"vBCEfet"    , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCEfet   )  }  )
            aadd( axArray[nPos][2], {"pICMSEfet"  , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pICMSEfet   )  }  )
            aadd( axArray[nPos][2], {"vICMSEfet"  , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vICMSEfet   )  }  )
      ElseIf  cST == "S60"    // aqui gas
            oItem:cCST="60"
            aadd( axArray, {"ICMSST" , {}, 1  } ); nPos := len(axArray)
            aadd( axArray[nPos][2], {"orig"        , TVoNFeItem():New("N", 1, 1, 1 ,  ,,oItem:orig        ) }  )
            aadd( axArray[nPos][2], {"CST"         , TVoNFeItem():New("N", 1, 2, 2 ,  ,,oItem:cCST        ) }  )
            aadd( axArray[nPos][2], {"vBCSTRet"    , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vBCSTRet    ) }  )
            aadd( axArray[nPos][2], {"pST"         , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:pST         ) }  )
            aadd( axArray[nPos][2], {"vICMSSTRet"  , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vICMSSTRet  ) }  )
            aadd( axArray[nPos][2], {"vBCFCPSTRet" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCFCPSTRET ) }  )
            aadd( axArray[nPos][2], {"pFCPSTRet"   , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pFCPSTRET   ) }  )
            aadd( axArray[nPos][2], {"vFCPSTRet"   , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vFCPSTRET   ) }  )
            aadd( axArray[nPos][2], {"pRedBCEfet"  , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pRedBCEfet  ) }  )
            aadd( axArray[nPos][2], {"vBCEfet"     , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCEfet     ) }  )
            aadd( axArray[nPos][2], {"pICMSEfet"   , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pICMSEfet   ) }  )
            aadd( axArray[nPos][2], {"vICMSEfet"   , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vICMSEfet   ) }  )
            aadd( axArray[nPos][2], {"vBCSTDest"   , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vBCSTDest   ) }  )
            aadd( axArray[nPos][2], {"vICMSSTDest" , TVoNFeItem():New("N", 1, 1, 15,2 ,,oItem:vICMSSTDest ) }  )