Retro1.org codex

*DECK NIPTXT
USETEXT NIPDEF
PROC ACB; 
BEGIN 
CONTROL STEXT;
*CALL ACB 
END 
TERM
USETEXT NIPDEF
PROC ACKHEAD; 
BEGIN 
CONTROL STEXT;
*CALL ACKHEAD 
END 
TERM
USETEXT NIPDEF
PROC ACNB;
BEGIN 
CONTROL STEXT;
*CALL ACNB
END 
TERM
USETEXT NIPDEF
PROC ACNT;
BEGIN 
CONTROL STEXT;
*CALL ACNT
END 
TERM
PROC AHEADER; 
BEGIN 
CONTROL STEXT;
      BASED ARRAY AHEADER[0:0] P(1);   # APPLICATION BLOCK HEADER.     #
        BEGIN 
*CALL HEADER
        END 
END 
TERM
PROC APPSTAT; 
BEGIN 
CONTROL STEXT;
*CALL APPSTAT 
END 
TERM
USETEXT NIPDEF
PROC AT;
BEGIN 
CONTROL STEXT;
*CALL AT
END 
TERM
USETEXT NIPDEF
PROC AWLNTRY; 
BEGIN 
CONTROL STEXT;
*CALL AWLNTRY 
END 
TERM
USETEXT NIPDEF
PROC BACKBUF; 
BEGIN 
CONTROL STEXT;
# 
      BUFFER FOR DOWNLINE BACKS 
# 
*CALL BACKBUF 
END 
TERM
USETEXT NIPDEF
PROC BPIPBUF; 
BEGIN 
CONTROL STEXT;
*CALL BPIPBUF 
END 
TERM
USETEXT NIPDEF
PROC CET; 
BEGIN 
CONTROL STEXT;
*CALL CET 
END 
TERM
USETEXT NIPDEF
PROC DBGBUF;
BEGIN 
CONTROL STEXT;
*CALL DBGBUF
END 
TERM
PROC DEQCOM;
BEGIN 
CONTROL STEXT;
*CALL DEQCOM
END 
TERM
USETEXT NIPDEF
PROC DISTAIL; 
BEGIN 
CONTROL STEXT;
*CALL DISTAIL 
END 
TERM
USETEXT NIPDEF
PROC DRHDR; 
BEGIN 
CONTROL STEXT;
*CALL DRHDR 
END 
TERM
PROC DUMPFLG; 
BEGIN 
CONTROL STEXT;
*CALL DUMPFLG 
END 
TERM
USETEXT NIPDEF
PROC FLIST; 
BEGIN 
CONTROL STEXT;
*CALL FLIST 
END 
TERM
USETEXT NIPDEF
PROC FREETAB; 
BEGIN 
CONTROL STEXT;
*CALL FREETAB 
END 
TERM
USETEXT NIPDEF
PROC GETMM ;
BEGIN 
CONTROL STEXT;
*CALL GETMM 
END 
TERM
USETEXT NIPDEF
PROC GETSM; 
BEGIN 
CONTROL STEXT;
*CALL GETSM 
END 
TERM
USETEXT NIPDEF
PROC INPARUT; 
BEGIN 
CONTROL STEXT;
*CALL INPARUT 
END 
TERM
USETEXT NIPDEF
PROC KSTTAB;
BEGIN 
CONTROL STEXT;
*CALL KSTTAB
END 
TERM
USETEXT NIPDEF
PROC KDIS;
BEGIN 
CONTROL STEXT;
*CALL KDIS
END 
TERM
USETEXT NIPDEF
PROC KHDRX; 
BEGIN 
CONTROL STEXT;
*CALL KHDRX 
END 
TERM
USETEXT NIPDEF
PROC KINITBF; 
BEGIN 
CONTROL STEXT;
*CALL KINITBF 
END 
TERM
USETEXT NIPDEF
PROC LLCB;
BEGIN 
CONTROL STEXT;
*CALL LLCB
END 
TERM
USETEXT NIPDEF
PROC MEM; 
BEGIN 
CONTROL STEXT;
*CALL MEM 
END 
TERM
USETEXT NIPDEF
PROC MSGIDX;
BEGIN 
CONTROL STEXT;
*CALL MSGIDX
END 
TERM
USETEXT NIPDEF
PROC NCNB;
BEGIN 
CONTROL STEXT;
*CALL NCNB
END 
TERM
USETEXT NIPDEF
PROC NCNT;
BEGIN 
CONTROL STEXT;
*CALL NCNT
END 
TERM
USETEXT NIPDEF
PROC NBT; 
BEGIN 
CONTROL STEXT;
*CALL NBT 
END 
TERM
USETEXT NIPDEF
PROC NHEADER; 
BEGIN 
CONTROL STEXT;
*CALL NHEADER 
END 
TERM
PROC NP$TAA;
BEGIN 
CONTROL STEXT;
*CALL NP$TAA
END 
TERM
USETEXT NIPDEF
PROC NP$NWNC; 
BEGIN 
CONTROL STEXT;
*CALL NP$NWNC 
END 
TERM
USETEXT NIPDEF
PROC NWLHEAD; 
BEGIN 
CONTROL STEXT;
*CALL NWLHEAD 
END 
TERM
USETEXT NIPDEF
PROC NWLNTRY; 
BEGIN 
CONTROL STEXT;
*CALL NWLNTRY 
END 
TERM
USETEXT NIPDEF
PROC NTON;
BEGIN 
CONTROL STEXT;
*CALL ON
END 
TERM
USETEXT NIPDEF
PROC OVERLAY; 
BEGIN 
CONTROL STEXT;
*CALL OVERLAY 
END 
TERM
PROC OVLSTAT; 
BEGIN 
CONTROL STEXT;
*CALL OVLSTAT 
END 
TERM
PROC PARAMP;
BEGIN 
CONTROL STEXT;
*CALL PARAMP
END 
TERM
PROC PARAMS;
BEGIN 
CONTROL STEXT;
*CALL PARAMS
END 
TERM
USETEXT NIPDEF
PROC PCNB;
BEGIN 
CONTROL STEXT;
*CALL PCNB
END 
TERM
USETEXT NIPDEF
PROC PIT; 
BEGIN 
CONTROL STEXT;
*CALL PIT 
END 
TERM
USETEXT NIPDEF
PROC POA; 
BEGIN 
CONTROL STEXT;
*CALL POA 
END 
TERM
USETEXT NIPDEF
PROC PRUBUFF; 
BEGIN 
CONTROL STEXT;
*CALL PRUBUFF 
END 
TERM
USETEXT NIPDEF
PROC PRUPERF; 
BEGIN 
CONTROL STEXT;
END 
TERM
USETEXT NIPDEF
PROC PWL; 
BEGIN 
CONTROL STEXT;
*CALL PWL 
END 
TERM
USETEXT NIPDEF
PROC RELFILE; 
BEGIN 
CONTROL STEXT;
*CALL RELFILE 
END 
TERM
USETEXT NIPDEF
PROC PT;
BEGIN 
CONTROL STEXT;
*CALL PT
END 
TERM
USETEXT NIPDEF
PROC SCPCOM;
BEGIN 
CONTROL STEXT;
*CALL SCPCOM
END 
TERM
USETEXT NIPDEF
PROC SSTCOM;
BEGIN 
CONTROL STEXT;
*CALL SSTCOM
END 
TERM
USETEXT NIPDEF
PROC STATTAB; 
BEGIN 
CONTROL STEXT;
*CALL STATTAB 
END 
TERM
USETEXT NIPDEF
PROC STATTB2; 
BEGIN 
CONTROL STEXT;
*CALL STATTAB2
END 
TERM
PROC STPRESP; 
# 
 RESPONSE WORD RETURNED FROM THE STATE TABLE PROCESSOR
# 
BEGIN 
CONTROL STEXT;
*CALL STPRESP 
END 
TERM
USETEXT NIPDEF
PROC SUPABH;
BEGIN 
CONTROL STEXT;
*CALL SUPABH
END 
TERM
USETEXT NIPDEF
PROC SWAPIN;
BEGIN 
CONTROL STEXT;
*CALL SWAPIN
END 
TERM
USETEXT NIPDEF
PROC SYSCOMD; 
BEGIN 
CONTROL STEXT;
*CALL SYSCOMD 
END 
TERM
USETEXT NIPDEF
PROC SYSTIME; 
BEGIN 
CONTROL STEXT;
*CALL SYSTIME 
END 
TERM
USETEXT NIPDEF
PROC TNT; 
BEGIN 
CONTROL STEXT;
*CALL TNT 
END 
TERM