Red de conocimiento informático - Problemas con los teléfonos móviles - Cómo llamar a subrutinas en VFP

Cómo llamar a subrutinas en VFP

Para llamar a un método en VFP, se debe escribir así:

Ejecutar sdl11 en abc

Y el procedimiento almacenado en abc.prg es así:

proce sdl11

*Nueva construcción de precio unitario de alquiler

*do sdl25

use .

copiar estructura a .

usar

usar .

eliminar todo para zldm=space(3)

paquete

usar

return

proce sdl12

*Adición de precios unitarios de arrendamiento

*Adición de precios unitarios de arrendamiento, la unidad de arrendamiento original ya existe en el precio de arrendamiento biblioteca,

*Pero si desea alquilar variedades recién agregadas en el medio, debe ejecutar este programa

Use .\docbf\kcwzcbj

copiar estructura a .

uso

devolución

proce sdl13

*Modificación precio unitario de alquiler

uso .

copiar estructura a .

usar

return

Si estamos llamando a un método o función, para pasar parámetros, en la llamada a un método, debería escribirse así:

hacer rzjjg en abc con 'P30120', 100

y abc.prg debería tener, rzjjg en él, y su primera declaración debe ser

para parámetro 1, parámetro 2,.

'El número de parámetros y la llamada deben corresponder entre sí'

func rzjjg amp; alquiler diario

para x3, x2 amp; x3: código de material devuelto, x2*djmj, 0) amp >return .cbjjs amp;calcular precio de pérdida

para x1, x2

selecciona 3

buscar x1

x4=iif (encontrado(), cbj*x2, 0)

selecciona 4

devolver x4

Lo anterior es para mi software comercial "Sistema de gestión de alquiler de equipos de construcción: una parte muy pequeña de la versión VFP".

Materiales de referencia:

Software de mi negocio "Sistema de gestión de alquiler de equipos de construcción-Versión VFP"