Click above to get retro games delivered to your door ever month!

Syntax: N_GETLINE()

Returns line number in the executing procedure when Event Trap occurred.

Example

line  1: PROCEDURE edit_rec
line  2: CLEAR
line  3: N_NEWFLD("PROC1")
line  4: @ 1,0 SAY "NAME:" GET Company->name
line  5: @ 2,0 SAY "ADDR:" GET Company->addr
line  6: READ
line  7: RETURN

PROCEDURE PROC1
? N_GETPROC()
  EDIT_REC
? N_GETLINE()
  6
RETURN

Notes

If the procedure executing at the time of event was compiled with the "-l"
option then N_PROCLINE will return 0.

Note that the Clipper function PROCLINE() will refer to the Event Procedure
itself, not the calling procedure.

N_GETLINE() returns valid information only inside of an event procedure.