Votos - 0, Puntuación media: 0
(
)
)
|
Otros manuales para este modelo:
Computadoras - HP Integrity NonStop H-Series (16.73 mb)
Computadoras - HP Integrity NonStop H-Series (957.56 kb)
Computadoras - HP Integrity NonStop H-Series (881.66 kb)
Computadoras - HP Integrity NonStop H-Series (965.62 kb)
Computadoras - HP Integrity NonStop H-Series (676.93 kb)
Computadoras - HP Integrity NonStop H-Series (393.72 kb)
Computadoras - HP Integrity NonStop H-Series (776.57 kb)
Resumen del manual
Examples
Pathsend Requester Example
sbuf ':=' "TRANSACTION ENDED NORMALLY" -> @sp;
CALL WRITE (error^log^fnum, buf, @sp '-' @sbuf);
IF <
THEN ! print an error msg and abend
CALL IO^error (msg^log^fnum);
END; ! PROC end^the^tmf^transaction
?PAGE "RETURN AN ENTRY FROM THE ASSIGN TABLE"
! This procedure is passed a logical ASSIGN name and searchs the
! ASSIGN table for the ASSIGN name. If found it returns the address
! of the table entry, otherwise false.
INT PROC get^assign (logical^name, len);
STR .logical^name;
INT len;
BEGIN
INT i := 0;
INT .assign^ (ci^assign);
WHILE i < assign^count DO
BEGIN
@assign^ := @assign^table[i];
IF assign^.logicalunit.filename = logical^name FOR len
AND assign^.logicalunit.filenamelen = len
THEN ! found matching ASSIGN
RETURN @assign^;
i := i + 1;
END;
RETURN false;
END; ! INT PROC get^assign
NonStop TS/MP Pathsend and Server Programming Manual – 132500
B -24
...Otros modelos de este manual:
Computadoras - HP NonStop G-Series (717.19 kb)
Computadoras - HP NonStop L-Series (717.19 kb)