33 lines
1.4 KiB
OpenEdge ABL
33 lines
1.4 KiB
OpenEdge ABL
12000 (*+84()
|
|
12002 PROCEDURE FIND(VAR SEARCHLIST: MODE; RECURSIVE: BOOLEAN; LENGTH: CNTR); EXTERN;
|
|
12010 PROCEDURE FINDPRC(RESMD: MODE; CNT: CNTR; CP:CODEPROC); EXTERN;
|
|
12020 PROCEDURE FINSTRUCT(CNT: CNTR); EXTERN;
|
|
12030 FUNCTION FINDREF(M: MODE): MODE; EXTERN;
|
|
12040 FUNCTION FINDROW(M: MODE; CNT:CNTR): MODE; EXTERN;
|
|
12050 PROCEDURE NEWFIELD(LEX: PLEX); EXTERN;
|
|
12060 PROCEDURE RECURFIX(VAR BASEM: MODE); EXTERN;
|
|
12070 ()+84*)
|
|
12090 (*+05() PROCEDURE OPENLOADFILE(VAR F: LOADFILE; PARAM: INTEGER; WRITING: BOOLEAN); EXTERN;
|
|
12100 PROCEDURE OPENTEXT(VAR F: TEXT; PARAM: INTEGER; WRITING: BOOLEAN); EXTERN;
|
|
12110 ()+05*)
|
|
12120 PROCEDURE CHECKPAGE; EXTERN;
|
|
12130 PROCEDURE OUTLST(LINE: INTEGER; VAR BUF: BUFFER; PTR: INTEGER); EXTERN;
|
|
12140 PROCEDURE OUTERR(N: INTEGER; LEV: ERRLEV; LEX: PLEX); EXTERN;
|
|
12150 PROCEDURE SEMERR(N: INTEGER); EXTERN;
|
|
12160 PROCEDURE INITIO; EXTERN;
|
|
12170 PROCEDURE SEMERRP(N: INTEGER; LEX: PLEX); EXTERN;
|
|
12180 PROCEDURE SUBREST; EXTERN;
|
|
12190 PROCEDURE SUBSAVE; EXTERN;
|
|
12200 PROCEDURE SCPUSH(M: MODE); EXTERN;
|
|
12210 FUNCTION SCPOP: MODE; EXTERN;
|
|
12220 FUNCTION SRPOPMD: MODE; EXTERN;
|
|
12230 PROCEDURE MODERR(M: MODE; N: INTEGER); EXTERN;
|
|
12240 FUNCTION HASHIN: PLEX; EXTERN;
|
|
12260 (*+82()
|
|
12270 PROCEDURE INITLX; EXTERN;
|
|
12280 PROCEDURE NEXTCH(LEVEL: INDEXTYPE); EXTERN;
|
|
12290 PROCEDURE LXERR(N: INTEGER); EXTERN;
|
|
12300 PROCEDURE LEXALF(LEX: PLEX; VAR ALF: ALFA); EXTERN;
|
|
12310 FUNCTION PARSIN: PLEX; EXTERN;
|
|
12320 ()+82*)
|