PC Toledo

Código: Selecionar todos

			DEFINE SPLITBOX

				DEFINE TOOLBAR TooBar_1 BUTTONSIZE 45,40 IMAGESIZE 32,32 FONT "Open Sans" SIZE 8 FLAT

					// Botões do menu principal
					BUTTON Button_tb1_Agenda CAPTION "Agenda" PICTURE "btAgendaRosa"   AUTOSIZE WHOLEDROPDOWN
					BUTTON Button_tb1_Cadastros CAPTION "Cadastros" PICTURE "btCadastroRosa" AUTOSIZE WHOLEDROPDOWN
					BUTTON Button_tb1_Financeiro CAPTION "Financeiro" PICTURE "btFinanceiro"   AUTOSIZE WHOLEDROPDOWN
					BUTTON Button_tb1_RH CAPTION "RH" PICTURE "btRH" AUTOSIZE WHOLEDROPDOWN
					BUTTON Button_tb1_Sistema CAPTION "Sistema" PICTURE "btSistemaRosa"  AUTOSIZE WHOLEDROPDOWN

					// Menu Agenda
					DEFINE DROPDOWN MENU BUTTON Button_tb1_Agenda
						ITEM 'Agendamento' ACTION form_agendamento() NAME Menu_bttb1_a_Agendamento IMAGE "mnCalendarioAzul"
						ITEM 'Lembretes'   ACTION form_Lembretes()   NAME Menu_bttb1_a_Lembretes IMAGE "mnSinoAzul"
					END MENU

					// Menu Cadastro
					DEFINE DROPDOWN MENU BUTTON Button_tb1_Cadastros
						ITEM 'Clientes'       ACTION form_clientes() NAME Menu_bttb1_b_Clientes IMAGE "mnClientes"
						ITEM 'Profissionais'  ACTION form_profissionais() NAME Menu_bttb1_b_Profissionais IMAGE "mnProfissionalAzul"
						ITEM 'Aparelhos'      ACTION form_aparelhos() NAME Menu_bttb1_b_Aparelhos IMAGE "mnAparelhoAzul"
						ITEM 'Salas'          ACTION form_salas() NAME Menu_bttb1_b_Salas IMAGE "mnPortaAzul"
						ITEM 'Usuários'       ACTION form_usuarios() NAME Menu_bttb1_b_Usuarios IMAGE "mnUsuarios"
					END MENU

					// Menu Financeiro
					DEFINE DROPDOWN MENU BUTTON Button_tb1_Financeiro
						ITEM 'Faturamento'                  ACTION form_Faturamento() NAME Menu_bttb1_c_Faturamento IMAGE "mnCtasReceberAzul"
						ITEM 'Contas a Receber / Recebidas' ACTION form_contasReceber() NAME Menu_bttb1_c_contasReceber IMAGE "mnCtasReceberAzul"
						ITEM 'Contas a Pagar / Pagas'       ACTION form_ContasPagar() NAME Menu_bttb1_c_ContasPagar IMAGE "mnCtasPagarAzul"
						SEPARATOR
						ITEM 'Plano de Contas'              ACTION form_PlanoDeContas() NAME Menu_bttb1_c_PlanoDeContas IMAGE "mnPlanoCtasAzul"
						ITEM 'Contas Bancárias / Movimento' ACTION form_Contas() NAME Menu_bttb1_c_Contas IMAGE "mnBank"
						ITEM 'Fluxo de Caixa'               ACTION msginfo('Módulo não implementado!','Em desenvolvimento') NAME Menu_bttb1_c_FluxoCaixa IMAGE "mnFluxoCaixa"
						SEPARATOR
						ITEM 'Transferências entre Contas'  ACTION form_Transferencias() NAME Menu_bttb1_c_Transferencias IMAGE "mnFluxoCaixa"
						ITEM 'Fechamento de Contas'         ACTION form_Fechamento_Contas() NAME Menu_bttb1_c_FechamentoContas IMAGE "mnCaixaRegistra"
						SEPARATOR
						// Aqui neste próximo item, gostaria que ele fosse um sub-Menu com outras opções
						// SUB-MENU 'Gráficos e Relatórios' 
							// ITEM Sub-Menu 1...
							// ITEM Sub-Menu 2...
						// END SUB-MENU
					END MENU

					// Menu RH
					DEFINE DROPDOWN MENU BUTTON Button_tb1_RH
						ITEM 'Fechamento de Comissões' ACTION form_Fechamento_Comissoes() NAME Menu_bttb1_d_FechamentoComssoes IMAGE "mnFolhaPgto"
					END MENU

					// Menu Sistema
					DEFINE DROPDOWN MENU BUTTON Button_tb1_Sistema
						ITEM 'Empresas'        ACTION form_empresas() NAME Menu_bttb1_e_Empresas IMAGE "mnEmpresaAzul"
						ITEM 'Configurações'   ACTION form_Configuracoes() NAME Menu_bttb1_e_Configuracoes IMAGE "mnConfigAzul"
						ITEM 'Logs do Sistema' ACTION msginfo('Módulo não implementado!','Em desenvolvimento') NAME Menu_bttb1_e_LogSistema IMAGE "mnLogsisAzul"
						ITEM 'Sobre'           ACTION Sobre() NAME Menu_bttb1_e_Sobre IMAGE "mnSobre"
					END MENU

				END TOOLBAR

				DEFINE TOOLBAR TooBar_0 BUTTONSIZE 200,40 IMAGESIZE 200,32 FONT "Open Sans" SIZE 8 FLAT
					BUTTON Button_tb0_Relogio CAPTION extendedDate() PICTURE "btCalendario" TOOLTIP 'Clique aqui para ver o calendário' AUTOSIZE ACTION ShowCalendario()
				END TOOLBAR

				DEFINE TOOLBAR TooBar_2 BUTTONSIZE 120,40 IMAGESIZE 90,32 FONT "Open Sans" SIZE 8 FLAT
					BUTTON Button_tb2_Notificacoes CAPTION "0.000 Notificações" PICTURE "btRecado" TOOLTIP 'Clique aqui para ver seus recados' AUTOSIZE ACTION ShowNotificacoes()
				END TOOLBAR

				DEFINE TOOLBAR TooBar_3 BUTTONSIZE 200,40 IMAGESIZE 200,32 FONT "Open Sans" SIZE 8 FLAT
					BUTTON Button_tb3_Empresas CAPTION "CLÍNICA ..." PICTURE "btEmpresa" TOOLTIP 'Clique aqui para trocar empresa' AUTOSIZE ACTION TrocarEmpresa()
				END TOOLBAR

				DEFINE TOOLBAR TooBar_4 BUTTONSIZE 60,40 IMAGESIZE 60,32 FONT "Open Sans" SIZE 8 FLAT
					BUTTON Button_tb4_TrocaSenha CAPTION "Olá ..." PICTURE "btUserHomem" TOOLTIP 'Clique aqui para alterar sua senha' AUTOSIZE ACTION TrocarSenha()
				END TOOLBAR

				DEFINE TOOLBAR TooBar_5 BUTTONSIZE 60,40 IMAGESIZE 60,32 FONT "Open Sans" SIZE 8 FLAT
					BUTTON Button_tb5_Sair CAPTION "Sair" PICTURE "btDesligar" AUTOSIZE ACTION FecharSistema()
				END TOOLBAR

			END SPLITBOX