Skip to content

Commit

Permalink
Rev_17/8/22_1
Browse files Browse the repository at this point in the history
- Implementado Dry Run. Alteração na lógica nas partes do programa aonde são requisitados alguns sinais de IO para verificação;
- Editada a rotina 'rTouchUp_Points';
- Acresentado dois robtargets a mais na classe cPar_Part e alterado outros dois. Os quatro novos pontos agora são 'pDrop_Hori_PalRight', 'pDrop_Vert_PalRight', 'pDrop_Hori_PalLeft', 'pDrop_Vert_PalLeft';
- Módulo 'Auxiliar' foi concluído;
- Criada rotina para verificar se houve queda de caixa durante deposito;
- Criada a rotina 'rMsg_Attempts_Over' para informar ao usuario que nenhuma das condições de processo foram satisfeita;
- Declaradas as inputs de alarmes.
  • Loading branch information
ptiago authored Aug 17, 2022
1 parent 6569749 commit 7a12438
Showing 1 changed file with 37 additions and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -30,13 +30,49 @@ MODULE Main_Module_tProcess
!*** Verifica se o palete esquerdo foi retirado
IF (DI_020_PAL_LEFT_RESET = 2) rReset_Pal 2;

!rBox_Fall;

ENDPROC

!*** Reseta o palete (T_ROB1 / T_PROCESS)
PROC rReset_Pal(num Pallet)

cPallet_Status{Pallet} := [0,1,1,0,0,FALSE];
!cPallet_Status{Pallet} := [0,1,1,0,0,FALSE];
!Incr cProduction_Part{Pallet}.Pallet_Rejected;

ENDPROC

!*** Rastreia queda de caixa
PROC rBox_Fall()

! IF (
! cSegment_Cur.Number = 22 OR
! cSegment_Cur.Number = 26 OR
! (cSegment_Cur.Number = 3 AND cProcess_Cur = 2)
! )
! AND
! (

! (
! (
! cPallet_Drop{cPallet_Status{nCur_Pallet}.Pos_Cur}.Qtd_Box = 2 AND
! (DI_007_PRES_BOX_1 = 0 OR DI_008_PRES_BOX_2 = 0)
! )
! OR bDry_Run = TRUE
! )
! OR
! (
! (
! cPallet_Drop{cPallet_Status{nCur_Pallet}.Pos_Cur}.Qtd_Box = 1 AND DI_007_PRES_BOX_1 = 0
! ) OR bDry_Run = TRUE
! )

! )
! THEN
! Incr cProduction_Part{cPallet_Status{nCur_Pallet}.Part_In_Pallet}.Box_Fallen;
! STOP;
! ENDIF

ENDPROC

ENDMODULE

0 comments on commit 7a12438

Please sign in to comment.