Producto: | TOTVS Backoffice |
---|---|
Línea de producto: | Línea Protheus |
Segmento: | Servicios |
Módulo: | TOTVS Backoffice (Línea Protheus) - Activo fijo (SIGAATF) |
Función: | ATFA030 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46829 |
El punto de entrada AF030VAL permite el manejo de los valores incluidos en la rutina Bajas del activo (ATFA030). Este ofrece flexibilidad para realizar ajustes o validaciones en los valores procesados durante las operaciones de baja manual de activos, permitiendo que el cliente aplique reglas específicas de negocio.
nVlVend := Iif(ExistBlock( "AF030VAL" ),ExecBlock("AF030VAL",.F.,.F.), 0)
User Function AF030VAL() Local nVlVend := 0 Local aBxAtivo := {} Alert("Punto de entrada AF030VAL() ejecutado.") AADD( aBxAtivo, { "N3_CBASE" , SN1->N1_CBASE } ) AADD( aBxAtivo, { "CNOTA" , SN4->N4_NOTA } ) AADD( aBxAtivo, { "CITEM" , SN1->N1_ITEM } ) AADD( aBxAtivo, { "N3_TIPO" , SN3->N3_TIPO } ) AADD( aBxAtivo, { "CSERIE" , SN4->N4_SERIE } ) AADD( aBxAtivo, { "VLRBAIXA", SN3->N3_VORIG1 } ) AADD( aBxAtivo, { "NQUANT" , SN1->N1_QUANTD } ) AADD( aBxAtivo, { "AUTPERCBX" , 100 } ) AADD( aBxAtivo, { "NVLVEND" , SN4->N4_VENDA } ) nVlVend := aBxAtivo[9][2] Return nVlVend
Importante