Symbol $CPPI

Definition

02317 1 00000 1 02320 1388CPPITXI*+1,1,** IN IR 1 AND INCREMENT BE PUSH DOWN CNT

Uses

01623 −0534 00 4 02317 1015LXD$CPPI,4 PICK UP CURRENT PDL COUNTER
01634 −0534 00 4 02317 1024LXD$CPPI,4 BEGINNING OF BLOCK JUST UNSAVED
01642 −0534 00 4 02317 1030LXD$CPPI,4 PUSH DOWN INDICATOR
02112 −0634 00 4 02317 1232SXD$CPPI,4 SET PUSH DOWN CELLS
02321 −0634 00 1 02317 1390SXD$CPPI,1 UP DATE PDL COUNTER LOCATION
02331 −0534 00 2 02317 1399LXD$CPPI,2 CURRENT PUSH DOWN COUNTER
02340 −0634 00 1 02317 1406SXD$CPPI,1 UPDATE PDL COUNTER CELL
02411 0622 00 0 02317 1460STDCPPI
02537 −0534 00 4 02317 1564LXD$CPPI,4 CURRENT PUSH DOWN LIST LOC.
02605 −0535 00 1 02317 1609LDC$CPPI,1 FIRST FREE CELL ON PDL
04216 −0534 00 4 02317 2416LXD$CPPI,4 GET PDL POINTER
04221 −0634 00 4 02317 2419SXD$CPPI,4 UPDATE PDL POINTER LOCATION
04267 −0534 00 4 02317 2457LXD$CPPI,4 START OPEN UNSAVE BY GETTING PDL POINTER
04303 −0634 00 4 02317 2469SXD$CPPI,4 SET CPPI
04605 −0534 00 4 02317 2710LXD$CPPI,4 SAVE CURRENT CONTENTS OF CPPI
05210 −0634 00 4 02317 3008SXD$CPPI,4 RESTORE TO ENTRACE VALUE
11613 0502 00 0 02317 5579CLS$CPPI SAVE PUSHDOWN POINTER
11630 −0534 00 4 02317 5596HARPLXD$CPPI,4
11640 −0535 00 4 02317 5604LDC$CPPI,4
15640 −0534 00 4 02317 7943LXD$CPPI,4 PUSH DOWN COUNTER
15663 −0534 00 4 02317 7964EV27LXD$CPPI,4
15666 −0634 00 4 02317 7967SXD$CPPI,4
15713 −0534 00 4 02317 7988LXD$CPPI,4 START OPEN UNSAVE
15725 −0634 00 4 02317 7998SXD$CPPI,4
17332 −0534 00 4 02317 8909LXD$CPPI,4 $CPPI IS COMPLEMENT OF PDL POSITOIN
17337 −0535 00 4 02317 8914LDC$CPPI,4 NEED TRUE POINTER FOR CALLING WORDS
17351 −0534 00 4 02317 8924UNDLXD$CPPI,4 PUSH UP $CPPI
17353 −0634 00 4 02317 8926SXD$CPPI,4
17360 −0534 00 1 02317 8934LXD$CPPI,1 PICK UP PDL PPINTER
17445 −0634 00 1 02317 8987SXD$CPPI,1 KEEP CPPI UP TO DATE ALSO
17454 −0634 00 1 02317 8996RESTORSXD$CPPI,1