...
Se requiere un punto de entrada que permita mantener la funcionalidad al usar el parámetro MV_MOEDLOC, igual a ".T." , y en los “Pedidos de compras(MATA121)” y demás funciones donde se utilice el parámetro; y al mismo tiempo poder alterar la tasa en la “Actualización de cotización(MATA150)”.
03. SOLUCIÓN
Se crea el PE "MT150PESC" que permite mantener la funcionalidad en “Pedidos de compras (MATA121)” al usar el parámetro MV_MOEDLOC, como “.T.”, y poder alterar la tasa en la “Actualización de cotización(MATA150)”; se modifica la función A150DescMoed del fuente "Actualización de cotización(MATA150)" para poder ejecutar el punto de entrada "MT150PESC".
...
| Totvs custom tabs box |
|---|
| tabs | Configuraciones Previas,Flujo de prueba,Punto de entrada,Ejemplo de uso |
|---|
| ids | paso01,paso02,paso03,paso04 |
|---|
|
| Totvs custom tabs box items |
|---|
| default | yes |
|---|
| referencia | paso01 |
|---|
|
- Desarrollar y compilar Compilar el punto de entrada entrada "MT150PESC"(en caso de ser necesario se puede alterar).
- Tener informado el parámetro MV_MOEDLOC igual a ".T."
- En la rutina de Proveedores (Ruta: COMPRAS (SIGACOM) >> Actualizaciones| Archivos Rutina: MATA020) incluir un proveedor.
- Mediante la rutina Productos (Ruta: COMPRAS (SIGACOM) >> Actualizaciones| Archivos Rutina: MATA010) ingresar un nuevo producto.
- Añadir una solicitud de compra (Ruta: COMPRAS (SIGACOM) >> Actualizaciones | Solicitudes | Solicitud de Compra Programa: MATA110).
- Mediante la rutina de “Generar cotizaciones(Ruta: COMPRAS (SIGACOM) >> Cotizaciones | Generar cotizaciones Programa: MATA131)” agregar cotización para la solicitud de compra.
|
| Totvs custom tabs box items |
|---|
| default | no |
|---|
| referencia | paso02 |
|---|
|
- Mediante la rutina de “Actualizar cotizaciones (Ruta: COMPRAS (SIGACOM) >> Cotizaciones | Generar cotizaciones Programa:MATA150)” informar una cotización en moneda extranjera(2,3,4,5).
- Verificar si de acuerdo al retorno del PE y la configuración del parámetro MV_MOEDLOC, revisar el apartado "04. INFORMACIÓN ADICIONAL" para mayor información.
|
| Totvs custom tabs box items |
|---|
| default | no |
|---|
| referencia | paso03 |
|---|
| Descripción | Permite manipular la variable usada para la actualización de la tasa de moneda en “Actualización de cotización(MATA150)". | Programa Fuente: | MATA150.PRX | Función | MT150PESC | | Parámetros | PARAMIXB//: Del tipo Lógico:, valores .T. (True) o .F. (False); indica si hay actualización en la cotización el valor se obtiene del parámetro MV_MOEDLOC MOEDLOC. | Retorno: | Lógico: regresa un .T. (True) o .F. (False) Al tener el parámetro MV_MOEDLOC igual a ".T." el punto de entrada debe regresar ".F." para agregar la cotización personalizada en "Actualización de cotización(MATA150)". |
|
| Totvs custom tabs box items |
|---|
| default | no |
|---|
| referencia | paso04 |
|---|
|
- Ejemplo del punto de entrada "MT150PESC".
| Bloco de código |
|---|
| language | xml |
|---|
| theme | Emacs |
|---|
| title | MT150PESC |
|---|
| linenumbers | true |
|---|
| #Include 'Protheus.ch'
User Function MT150PESC()
Local lRet:=.T.
Local lM150PESC:=.F.
If ValType(PARAMIXB) == "A"
lM150PESC:=PARAMIXB[1]
IF FunName()=="MATA150" .AND. lM150PESC
lRet:=.F.
ENDIF
EndIf
Return lRet |
|
|
...
