Línea de producto: | Microsiga Protheus® |
|---|---|
Segmento: | Servicios |
Módulo: | Financiero |
El punto de entrada F090SE5 maneja movimientos bancarios procesados teniendo como parámetro el Recno de los registros SE5 que se utilizaron en la baja automática.
Orden | Nombre | Tipo |
|---|---|---|
1 | ParamIxb[1] = aRecSe5 (Array con los Recnos de los registros SE5 procesados después de la finalización de la baja.) | Array |
User Function F090SE5()
Local aRecno := ParamIxb[1]
Local nCntFor :=0
dbSelectArea("SE5")
DbSetOrder(1)
For nCntFor := 1 to Len(aRecno)
SE5->(dbGoto(aRecno[nCntFor]))
MSGAlert("Título marcado en SE5 Sucursal:" + SE5->e5_filial + Chr(13)+Chr(10) + ", Fecha,"+ DtOC(SE5->e5_data) + Chr(13)+Chr(10) + ", Tipo," + SE5->e5_tipo + Chr(13)+Chr(10) + ", Moneda" + ;
SE5->E5_MOEDA + Chr(13)+Chr(10) + ", Valor," + str(SE5->e5_valor ) + Chr(13)+Chr(10) + ", Modalidad," + SE5->e5_natureza + Chr(13)+Chr(10) + ", Número de cheque," + SE5->e5_numcheq + ;
Chr(13)+Chr(10) + ", Documento," + SE5->e5_documen )
Next nCntFor
Return
|
No hay.
No hay.