anÃƒÂ¡lise tarifÃƒÂ¡ria com base nas faturas de energia elÃƒÂ©trica do grupo a

More documents

Recommendations

Info

76Sub ContaVerde(vCodigoConta As Long, vTipoFornecimento As Byte)Dim vDB As DatabaseDim rsVerde As RecordsetDim rsTarifaVerde As RecordsetDim i As IntegerDim vGravaFPp, vGravaFPfpSet vDB = OpenDatabase(App.Path & "\Contas.mdb")Set rsVerde = vDB.OpenRecordset("SELECT * FROM ContaVerde WHERECodigoConta = " & vCodigoConta)Set rsTarifaVerde = vDB.OpenRecordset("SELECT * FROM TarifaVerde WHERECodigoFornecimento = " & vTipoFornecimento)'Preenche o vetor das tarifasvTarifaVerde(1, 1) = rsTarifaVerde("RKW")vTarifaVerde(1, 2) = rsTarifaVerde("RMWhPS")vTarifaVerde(1, 3) = rsTarifaVerde("RMWhPU")vTarifaVerde(1, 4) = rsTarifaVerde("RMWhFPS")vTarifaVerde(1, 5) = rsTarifaVerde("RMWhFPU")vTarifaVerde(1, 6) = rsTarifaVerde("RKWUltra")vDRmax = 0vFPminP = 0vFPminFP = 0vFPminAUX = 0vGravaFPp = 0vGravaFPfp = 0vKWOrg = 0vGravaMesFPmin = 0rsVerde.MoveFirstFor i = 1 To 12vVerde(i, 1) = rsVerde("DemandaRegistrada")vVerde(i, 2) = rsVerde("ConsumoAtivaP")vVerde(i, 3) = rsVerde("UFERP")vVerde(i, 4) = rsVerde("ConsumoAtivaFP")vVerde(i, 5) = rsVerde("UFERFP")'Calcula o fator de potencia atraves da UFERvFPmP(i, 1) = ivFPmP(i, 2) = 0.92 / ((vVerde(i, 3) / vVerde(i, 2)) + 1)vFPmFP(i, 1) = ivFPmFP(i, 2) = 0.92 / ((vVerde(i, 5) / vVerde(i, 4)) + 1)'Calcula o menor fator de potencia na ponta e o menor fora da pontaIf i = 1 ThenvFPminP = vFPmP(i, 2)
77vFPminFP = vFPmFP(i, 2)vGravaFPp = ivGravaFPfp = iElseIf vFPmP(i, 2) < vFPminP ThenvFPminP = vFPmP(i, 2)vGravaFPp = iEnd IfIf vFPmFP(i, 2) < vFPminFP ThenvFPminFP = vFPmFP(i, 2)vGravaFPfp = iEnd IfEnd If'Calcula o fator de carga mensal na ponta e fora da pontavFCmP(i, 1) = ivFCmP(i, 2) = vVerde(i, 2) / (66 * vVerde(i, 1))vFCmFP(i, 1) = ivFCmFP(i, 2) = vVerde(i, 4) / (664 * vVerde(i, 1))'Encontra a maior demandaIf vVerde(i, 1) > vDRmax ThenvDRmax = vVerde(i, 1)End IfNextrsVerde.MoveNext'Encontra o menor fator de potencia, tanto na ponta quanto fora da pontaIf vFPminP
Page 2 and 3:
RONIERI MARIN FERROANÁLISE TARIFÁ
Page 4 and 5:
A Deus pela minha vida e aos meus p
Page 6 and 7:
LISTA DE FIGURASFigura 4.1 - Conta
Page 8 and 9:
SIMBOLOGIAANEEL - AGÊNCIA NACIONAL
Page 10 and 11:
GLOSSÁRIOOs conceitos básicos a s
Page 12 and 13:
Demanda: médias das potências el
Page 14 and 15:
) Tarifa Verde: modalidade estrutur
Page 16 and 17:
Onde θ é o ângulo entre os vetor
Page 18 and 19:
Unidade consumidora: conjunto de in
Page 20 and 21:
4.2.1 Calculo da fatura referente
Page 22 and 23:
RESUMOO presente trabalho baseia-se
Page 24 and 25:
24Uma análise dos dados de uma sé
Page 26 and 27: 26No próximo capítulo intitulado
Page 28 and 29: 28fabricação de aparelhos e equip
Page 30 and 31: 30obtenha resultados incorretos. As
Page 32 and 33: 32* No Horário Fora da Ponta:FCCA
Page 34 and 35: 34na Resolução ANEEL nº456/00. E
Page 36 and 37: 36Tabela-1: Opções tarifárias pa
Page 38 and 39: 38C A = consumo mensal de energia a
Page 40 and 41: 40⎛ 0,92 ⎞= D ⋅⎜ − 1⎟R
Page 42 and 43: 425.1.1. Consumo de Energia:5.1.1.1
Page 44 and 45: 44N f ⎡ ⎛ ⎞∑ ⎢0,92UFER =
Page 46 and 47: 465.1.3. - Tarifa de Ultrapassagem:
Page 48 and 49: 48⎡ ⎛ CQh⎞⎤f ⎢⎜⎟h= co
Page 50 and 51: 50As expressões abaixo mostram com
Page 52 and 53: 52CAPÍTULO IIIANÁLISE DA ESTRUTUR
Page 54 and 55: 54discriminados o Código da Conta;
Page 56 and 57: 56demandas registradas mensalmente
Page 58 and 59: 58Na Tabela 8 são discriminados o
Page 60 and 61: 60CAPÍTULO IVESTUDO DE CASO ATRAV
Page 62 and 63: 62Figura 4.2: INTERFACENo campo de
Page 64 and 65: 64demanda faturada e o seu dobro. N
Page 66 and 67: 66O ícone denominado Consumo Regis
Page 68 and 69: 68CONCLUSÃOCom base no exposto nes
Page 70 and 71: 70REFERÊNCIAAgência Nacional de E
Page 72 and 73: 72APÊNDICE A'Variavel para definir
Page 74 and 75: 74vDRmax = vConvencional(i, 1)End I
Page 78 and 79: 78ReDim vDemContratada(1 To vNumDem
Page 80 and 81: 80Sub ContaAzul(vCodigoConta As Lon
Page 82 and 83: 82vNumDemandaP = 0For i = (vDRmaxP
Page 84: 84vValorTotal = vValorTotal + vValo
show all

anÃƒÂ¡lise tarifÃƒÂ¡ria com base nas faturas de energia elÃƒÂ©trica do grupo a

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?