DDSPRNT ;SFISC/MKO-PRINT A FORM ;02:51 PM 18 Nov 1994
Source file <DDSPRNT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
W(DDSSTR,DDSCOL) | ;Write DDSSTR
|
|
HDR2 | ;First header for non-CRTs
|
|
FORM | ;Form data
|
|
HDR1 | ;First header for CRTs
|
|
SELFORM(DDSFORM) | ;Select form
|
|
WR(DDSLAB,DDSVAL,DDSFLG) | ;Write label and value
|
|
WP(DDSWP,DIWL,DDSLF) | ;Print text in array @DDSWP
|
|
HEADER | ;All headers except first
|
|
INIT | ;Setup
|
|
END | ;Finish up
|
|
PCOL(DDSVAL,DDSCOL) | ;Print DDSVAL
|
|
;Entry point for queued reports
|
||
PAGEBRK(DDSPBRK) | ;Prompt
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZIS("C" | END+2 |
^%ZTSK - [#14.4] | DDSPRNT+11, DDSPRNT+16 |
^DIC - [#1] | INIT+5 |
^DIST( | FORM+4, FORM+16, FORM+19, FORM+21, FORM+23, FORM+25, FORM+31, FORM+35 |
^UTILITY($J | WP+8!, WP+18, WP+21, WP+22, WP+24! |
Name | Line Occurrences |
---|---|
@( | PRINT+7 |
END | DDSPRNT+16, PRINT+8 |
FORM | PRINT+8 |
HEADER | W+1 |
INIT | PRINT+6 |
PAGEBRK | DDSPRNT+8 |
PCOL | FORM+20, FORM+22, FORM+24, FORM+26, WR+7 |
SELFORM | DDSPRNT+7 |
W | FORM+7, FORM+9, FORM+11, FORM+13, FORM+15, FORM+16, FORM+18, FORM+20, FORM+22, FORM+24 , FORM+26, FORM+30, WR+3, PCOL+4, WP+22, WP+25 |
WP | FORM+4 |
Name | Field # of Occurrence |
---|---|
^(0 | WP+15, INIT+5 |
^(21 | FORM+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | SELFORM+1~, INIT+1~ |
%H | INIT+1~, INIT+2* |
%W | SELFORM+1~ |
%Y | SELFORM+1~ |
%ZIS | DDSPRNT+11*, DDSPRNT+12! |
C | SELFORM+1~ |
DDH | SELFORM+1~ |
DDSBK | PRINT+1~ |
DDSCNT | WP+6~, WP+13*, WP+14, WP+15, WP+19*, WP+20*, WP+21*, WP+22 |
DDSCOL | PCOL~, PCOL+2, PCOL+5, W~, W+2 |
DDSCOL1 | PRINT+1~ |
DDSCOL2 | PRINT+1~, WR+4 |
DDSCOL3 | PRINT+1~, WR+6~*, WR+7 |
DDSCRT | PRINT+1~, PRINT+7, HEADER+1, INIT+7* |
DDSFILE | PRINT+1~, HDR2+4, INIT+4*, INIT+5*, INIT+6* |
DDSFLG | WR~, WR+1 |
DDSFORM | DDSPRNT+6~, DDSPRNT+7, DDSPRNT+18, FORM+4, FORM+16, FORM+19, FORM+21, FORM+23, FORM+25, FORM+31 , FORM+35, HDR2+3, SELFORM~, SELFORM+4* |
DDSFORM(0 | FORM+7, FORM+8, FORM+9, FORM+10, FORM+11, FORM+12, FORM+15, FORM+27!, SELFORM+4*, INIT+4 |
DDSHBK | PRINT+2~, FORM+38 |
DDSHLIN | PRINT+2~, HDR2+5, INIT+3* |
DDSI | WP+6~, WP+15* |
DDSIND | PCOL+1~, PCOL+3*, PCOL+4, PCOL+5 |
DDSLAB | WR~, WR+4 |
DDSLF | WP~, WP+11*, WP+17, WP+25 |
DDSPAGE | PRINT+2~, HDR2+2*, HDR2+5 |
DDSPBRK | DDSPRNT+6~, DDSPRNT+8, PAGEBRK~, PAGEBRK+6* |
DDSPFRST | FORM+34*, FORM+36! |
DDSPG | FORM+33~, FORM+35* |
DDSPGN | FORM+33~, FORM+34*, FORM+35* |
DDSQUE | PRINT+2~, HEADER+4, INIT+8* |
DDSSTR | W~, W+2 |
DDSVAL | WR~, WR+1, WR+7, PCOL~, PCOL+3, PCOL+5 |
DDSWIDTH | PCOL+1~, PCOL+2*, PCOL+3, PCOL+5 |
DDSWP | WP~, WP+4, WP+13, WP+15 |
DIC | SELFORM+1~, SELFORM+2*, SELFORM+3! |
DIC(0 | SELFORM+2* |
DIFM | DDSPRNT+4~*, PRINT+5~* |
DIR | HEADER+2~, PAGEBRK+1~ |
DIR("A" | PAGEBRK+3* |
DIR("B" | PAGEBRK+4* |
DIR(0 | HEADER+3*, PAGEBRK+2* |
DIROUT | PAGEBRK+1~ |
DIRUT | FORM+4, FORM+7, FORM+9, FORM+11, FORM+13, FORM+15, FORM+16, FORM+18, FORM+20, FORM+22 , FORM+24, FORM+26, FORM+30, FORM+35, FORM+36, WR+3, PCOL+3, PCOL+4, WP+21, W+1 , HEADER+1, HEADER+4*, PAGEBRK+1~, PAGEBRK+5, END+3! |
DIW | WP+5~ |
DIWF | WP+5~ |
DIWI | WP+5~ |
DIWL | WP~, WP+9*, WP+18, WP+21, WP+22 |
DIWR | WP+5~, WP+10* |
DIWT | WP+5~ |
DIWTC | WP+5~ |
DIWX | WP+5~ |
DN | WP+5~ |
DTOUT | PAGEBRK+1~, END+3! |
DUOUT | PAGEBRK+1~, END+3! |
DX | PRINT+3~ |
DY | PRINT+3~ |
I | DDSPRNT+19~*, WP+6~, SELFORM+1~ |
IO | DDSPRNT+26 |
IO("Q" | DDSPRNT+16 |
IOF | HDR1+1 |
IOM | PCOL+2, WP+10, HDR2+5, HDR2+6 |
>> IOP | DDSPRNT+24* |
IOSL | W+1 |
IOST | INIT+7 |
POP | DDSPRNT+12!, DDSPRNT+13! |
Q | SELFORM+1~ |
U | DDSPRNT+18, FORM+7, FORM+8, FORM+9, FORM+10, FORM+11, FORM+12, FORM+15, FORM+16, WP+4 , WP+13, HDR2+3, INIT+4, INIT+5 |
X | PRINT+3~, FORM+19*, FORM+20, FORM+21*, FORM+22, FORM+23*, FORM+24, FORM+25*, FORM+26, WP+6~ , WP+15*, HEADER+2~, SELFORM+1~, PAGEBRK+1~, INIT+1~ |
Y | PRINT+3~, HEADER+2~, SELFORM+1~, SELFORM+4, PAGEBRK+1~, PAGEBRK+6, INIT+1~, INIT+3 |
Y(0 | SELFORM+4 |
Z | WP+6~ |
>> ZTDESC | DDSPRNT+18* |
>> ZTQUEUED | INIT+8, END+1 |
>> ZTREQ | END+1* |
>> ZTRTN | DDSPRNT+17* |
>> ZTSAVE( | DDSPRNT+19* |
ZTSK | DDSPRNT+21, DDSPRNT+23! |
>> ZTSTOP | HEADER+4* |