// Inicializa sistema de navegação por abas
Set(varCurrentNav7, First(colNavMenu7));

// Reseta filtros de pesquisa
UpdateContext({
    searchIDValor: "",
    searchEIValor: "",
    searchFonteValor: "",
    searchGrupoValor: "",
    searchAcaoValor: "",
    searchClassificacaoValor: "",
    searchAcompanhamentoValor: "",
    searchProcedenciaValor: "",
    searchSiafiEntradaValor: "",
    searchUAValor: "",
    searchObjetoValor: ""
});

// Button_galEmpenhosPendentes.OnSelect
Set(currObjeto, ThisItem);
Navigate(Detalhamento, ScreenTransition.Fade)

// ButtonCanvas37.OnSelect
Refresh(BaseEmpenhos2025);
Notify("Base de empenhos atualizada!", NotificationType.Success)

// Button_galSolicitacoesPendentes.OnSelect
Set(currObjetoSolicitacao, ThisItem);
Navigate(Programação_Editar_1, ScreenTransition.Fade)

// ButtonCanvas37_3.OnSelect - Aplicar filtros
Navigate(Programação_Controle, ScreenTransition.None);

// ButtonCanvas37_4.OnSelect - Exportar histórico
// (funcionalidade de exportação)

// Rectangle9_1.OnSelect - Fechar painel
UpdateContext({visAlteracoes: false})

// ButtonCanvas16.OnSelect
If(
    Form6.Valid,
    // Mostra loading
    UpdateContext({visLoading: true});
    
    // Salva o formulário
    SubmitForm(Form6);
    
    // Aguarda conclusão
    If(
        Form6.Error = Blank(),
        // Sucesso
        UpdateContext({visLoading: false});
        Notify("Programação criada com sucesso!", NotificationType.Success);
        Back(),
        // Erro
        UpdateContext({visLoading: false});
        Notify("Erro ao salvar: " & Form6.Error, NotificationType.Error)
    ),
    // Formulário inválido
    Notify("Preencha todos os campos obrigatórios", NotificationType.Warning)
)

// EmailPrevScreen_13.OnSelect
ResetForm(Form6);
Back()

// Inicializa componentes
Set(varReset, false);
Set(mudanca, false);
Set(varChecks, false);

// Carrega tarefas relacionadas
Set(varTarefasAPMD, 
    CountRows(
        Filter(
            Planejamento2025Tarefas,
            'ID Programação' = currObjeto.ID
        )
    ) > 0
);

Set(varTarefasArea,
    CountRows(
        Filter(
            BaseSolicitacoesPlanejamento,
            'ID Programação' = currObjeto.ID,
            Status = "Pendente"
        )
    ) > 0
)

[
    {Mês: "Janeiro", Planejado: pJan_1, Replanejado: rJan_5, 
     Liquidado: lJan_2, Empenhado: eJan_2},
    {Mês: "Fevereiro", Planejado: pFev_7, Replanejado: rFev_5, 
     Liquidado: lFev_2, Empenhado: eFev_2},
    // ... demais meses
]

// rJan_5.OnChange (exemplo)
Set(mudanca, true)

// Label94_14 - Data/Hora
Text(ThisItem.Created, "dd/mm/yyyy hh:mm")

// Label94_15 - Autor
ThisItem.Author.DisplayName

// Label98_7 - Texto da observação
ThisItem.Observação

// Button_Excluir_Obs - Excluir
OnSelect:
    Set(currObservacao, ThisItem);
    UpdateContext({visExcluirObservacao: true})

// Image10_7 - Foto do autor
UsuáriosdoOffice365.UserPhotoV2(ThisItem.Author.Email)

// Button_Enviar.OnSelect
If(
    !IsBlank(TextInput_Mensagem.Text),
    
    // Adiciona observação
    Patch(
        BaseObservacoesPlanejamento,
        Defaults(BaseObservacoesPlanejamento),
        {
            'ID Programação': currObjeto.ID,
            Observação: TextInput_Mensagem.Text,
            Author: {
                '@odata.type': "#Microsoft.Azure.Connectors.SharePoint.SPListExpandedUser",
                Claims: "i:0#.f|membership|" & UsuáriosdoOffice365.MyProfileV2().mail,
                Department: "",
                DisplayName: UsuáriosdoOffice365.MyProfileV2().displayName,
                Email: UsuáriosdoOffice365.MyProfileV2().mail,
                JobTitle: "",
                Picture: ""
            }
        }
    );
    
    // Limpa campo
    Reset(TextInput_Mensagem);
    
    Notify("Observação adicionada!", NotificationType.Success),
    
    Notify("Digite uma observação", NotificationType.Warning)
)

// Component: _excluirObservacao_1
Visible: visExcluirObservacao

// Button_Excluir_Obs.OnSelect (dentro do modal)
Remove(
    BaseObservacoesPlanejamento,
    currObservacao
);

UpdateContext({visExcluirObservacao: false});
Notify("Observação excluída", NotificationType.Information)

// Button_Tarefas.OnSelect
UpdateContext({visLoading: true});

// Cria tarefa no Planner
Set(taskId,
    Planner.CreateTask(
        "ID_DO_PLANO", // ID do plano no Planner
        {
            title: "Revisão: " & currObjeto.Objeto,
            assignments: {
                "ID_USUARIO": {
                    '@odata.type': "#microsoft.graph.plannerAssignment",
                    orderHint: " !"
                }
            },
            dueDateTime: DateAdd(Now(), 7, Days),
            bucketId: "ID_DO_BUCKET"
        }
    ).id
);

// Registra na base local
If(
    !IsBlank(taskId),
    Patch(
        Planejamento2025Tarefas,
        Defaults(Planejamento2025Tarefas),
        {
            'ID Programação': currObjeto.ID,
            'ID Tarefa Planner': taskId,
            Status: "Criada",
            'Data Criação': Now()
        }
    );
    
    Set(varTarefasAPMD, true);
    Notify("Tarefa criada no Planner!", NotificationType.Success),
    
    Notify("Erro ao criar tarefa", NotificationType.Error)
);

UpdateContext({visLoading: false})

Button_Tarefas.Visible: !varTarefasAPMD && _varPermissao = "APMD"

// CheckboxCanvas7_5 - Marcar como concluída
OnCheck:
    // Atualiza no Planner
    Planner.UpdateTask(
        ThisItem.'ID Tarefa Planner',
        "ID_DO_PLANO",
        {
            percentComplete: 100
        }
    );
    
    // Atualiza localmente
    Patch(
        Planejamento2025Tarefas,
        ThisItem,
        {
            Status: "Concluída",
            'Data Conclusão': Now()
        }
    )

// TextCanvas16_5 - Descrição da tarefa
ThisItem.Título & " - " & Text(ThisItem.'Data Criação', "dd/mm/yyyy")

// CheckboxCanvas7_4.OnCheck
// Similar ao sistema de tarefas, mas para solicitações

// ButtonCanvas28_5.OnSelect
// Navegar para detalhes do DDO ou abrir documento

// Timer2_2 - Feedback visual de salvamento
Duration: 2000
OnTimerEnd:
    UpdateContext({visCarregando: false})

// Timer4_2 - Sincronização periódica
Duration: 5000
Repeat: true
AutoStart: varTeste

OnTimerEnd:
    If(
        varTeste,
        // Atualiza dados
        Refresh(BaseObservacoesPlanejamento);
        Refresh(BaseControleDDO);
        Refresh(Planejamento2025Tarefas);
        
        Set(varCarregandoErro, false);
        Set(varTeste, false)
    )

// Inicializa navegação
Set(varCurrentNav7, 
    LookUp(colNavMenu7, Label = "Solicitações")
)

// ButtonCanvas37_13.OnSelect
Set(currObjeto, ThisItem);
Navigate(Detalhamento, ScreenTransition.Fade)

// ButtonCanvas37_11 - Atualizar
Refresh(BaseEmpenhos2025);
Notify("Base atualizada!", NotificationType.Success)

// ButtonCanvas37_12 - Exportar
UpdateContext({visLoading: true});
Set(varImagem, First(Shuffle(colImagensLoading)).Imagem);
Export(galEmpenhosPendentes_4, "Empenhos_Solicitacoes_" & 
       Text(Now(), "yyyymmdd"));
UpdateContext({visLoading: false})

// ButtonCanvas37_8.OnSelect - Aplicar Filtros
// (lógica de filtros)

// ButtonCanvas37_6.OnSelect - Exportar Histórico
// (lógica de exportação)

// Rectangle9_9.OnSelect - Fechar
UpdateContext({visAlteracoes: false})

// Checkbox1_2 - Seleção do empenho
Default: varSelecionarTodosEmpenhos

OnCheck:
    ClearCollect(
        colEmpenhos,
        If(
            IsEmpty(colEmpenhos),
            Table(ThisItem),
            Collect(colEmpenhos, ThisItem)
        )
    )

OnUncheck:
    Remove(
        colEmpenhos,
        LookUp(colEmpenhos, ID = ThisItem.ID)
    )

DisplayMode:
    If(
        !IsBlank(ThisItem.'Número Empenho'),
        DisplayMode.Edit,
        DisplayMode.Disabled
    )

// TextCanvas10_3 - Informações do empenho
ThisItem.'Número Empenho' & " - R$ " & 
Text(ThisItem.'Valor Empenhado', "#,##0.00")

// Dentro do componente Confirmacao_1
// Button Confirmar.OnSelect
If(
    varExcluir,
    
    // Remove programação
    Remove(
        PlanejamentoGeral2025,
        currObjeto
    );
    
    // Remove dados relacionados
    RemoveIf(
        BaseEmpenhos2025,
        'ID Programação' = currObjeto.ID
    );
    
    RemoveIf(
        BaseControleDDO,
        'ID Programação' = currObjeto.ID
    );
    
    RemoveIf(
        BaseObservacoesPlanejamento,
        'ID Programação' = currObjeto.ID
    );
    
    Set(varExcluir, false);
    UpdateContext({visExcluirProgramacao: false});
    Notify("Programação excluída!", NotificationType.Warning);
    Navigate(Programação_Controle, ScreenTransition.Fade)
)

// navBar_1 - Barra de navegação de teste
// ButtonCanvas18 - Botão de ação 1
// ButtonCanvas32 - Botão de ação 2 (carrega imagens)
OnSelect:
    ClearCollect(
        collectionImagens,
        {ID: 1, Imagem: 'teste1'},
        {ID: 2, Imagem: 'teste2'})

// ButtonCanvas36 - Botão de ação 3
// Image9 - Preview de imagem
Image: First(collectionImagens).Imagem

// Diversos ComboBox de filtros (scEI, scFonte, scGrupo, etc.)
// Usados para testar lógica de filtros antes de implementar nas telas principais