cdc:nos2.source:opl.opl871:common:comufmt
Common COMUFMT
2 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.comufmt +++| 00002 M01S00002.comufmt +++|# COMUFMT - COMMON DEFINITIONS USED BY REPORT FORMATTER. # 00003 M01S00003.comufmt +++| CONTROL NOLIST; 00004 M01S00004.comufmt +++| CONTROL IFEQ LISTCON,1; 00005 M01S00005.comufmt +++| CONTROL LIST;
Line S00006 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00006 M02S00006.ns22000 ---| CONTROL FI; 00007 M01S00001.ns22000 +++| CONTROL FI; 00008 M01S00007.comufmt +++| BEGIN # COMUFMT # 00009 M01S00008.comufmt +++| 00010 M01S00009.comufmt +++|# 00011 M01S00010.comufmt +++|*** COMUFMT - COMMON DEFINITIONS USED BY REPORT FORMATTER. 00012 M01S00001.281l803 +++|* 00013 M01S00002.281l803 +++|* COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00014 M01S00011.comufmt +++|*
Line S00012 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00015 M02S00012.ns22000 ---|* *COMUFMT* CONTAINS COMMON DECLARATIONS USED ONLY BY
Line S00013 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00016 M02S00013.ns22000 ---|* THE *MSS* REPORT FORMATTER ROUTINES. 00017 M01S00002.ns22000 +++|* *COMUFMT* CONTAINS COMMON DECLARATIONS USED BY SYMPL 00018 M01S00003.ns22000 +++|* REPORT FORMATTER ROUTINES. 00019 M01S00014.comufmt +++|* DEFINITIONS NEEDED BY CALLING ROUTINES ARE CONTAINED 00020 M01S00015.comufmt +++|* IN *COMUOUT*. 00021 M01S00016.comufmt +++|# 00022 M01S00017.comufmt +++| 00023 M01S00018.comufmt +++| 00024 M01S00019.comufmt +++| DEF BLANK #0,0,0,0#; # PARAMETERS FOR BLANK LINE # 00025 M01S00020.comufmt +++| DEF EMPTY #0#; # INDICATES EMPTY FIELD # 00026 M01S00021.comufmt +++| DEF LINELEN #14#; # WORDS IN A PRINT LINE # 00027 M01S00022.comufmt +++| DEF MAXLC #66#; # MAXIMUM LINE COUNT PER PAGE # 00028 M01S00023.comufmt +++| DEF MAXLINE #O"777777"#; # EJECT LINE COUNT # 00029 M01S00024.comufmt +++| DEF PRBUFL #O"1001"#; # LENGTH OF *CIO* BUFFER # 00030 M01S00025.comufmt +++| DEF PRCEJ #"1"#; # PAGE EJECT CARRIAGE CONTROL # 00031 M01S00026.comufmt +++| DEF PRCOLIM #140#; # COLUMN LIMIT # 00032 M01S00027.comufmt +++| DEF PRDBL #"0"#; # DOUBLE SPACE CARRIAGE CONTROL # 00033 M01S00028.comufmt +++| DEF PRDEFLIM #60#; # DEFAULT LINE LIMIT # 00034 M01S00029.comufmt +++| DEF PRTABENT #3#; # NUMBER OF PRINT TABLE ENTRIES # 00035 M01S00004.ns22000 +++| DEF PRTABLEN #15#; # WORDS IN PRINT TABLE # 00036 M01S00030.comufmt +++| DEF SPACES #" "#; # USED TO BLANK FILL ITEMS # 00037 M01S00031.comufmt +++| 00038 M01S00032.comufmt +++| COMMON UFMTCOM; 00039 M01S00033.comufmt +++| BEGIN # UFMTCOM # 00040 M01S00034.comufmt +++| 00041 M01S00035.comufmt +++| ITEM ORD U; # ORDINAL OF PRINT TABLE ENTRY # 00042 M01S00036.comufmt +++| 00043 M01S00037.comufmt +++| BASED 00044 M01S00038.comufmt +++| ARRAY RPFET [0:0] S(SFETL); # REPORT FILE *FET* # 00045 M01S00039.comufmt +++| ; 00046 M01S00040.comufmt +++| 00047 M01S00041.comufmt +++| ARRAY LINEBUFF [1:PRTABENT] S(LINELEN); # PRINT LINE BUFFER # 00048 M01S00042.comufmt +++| BEGIN 00049 M01S00043.comufmt +++| ITEM LIN$BUF C(00,00,140); # HOLDS 138 CHARACTER LINE # 00050 M01S00044.comufmt +++| ITEM LIN$CNTRL C(00,00,01); # CARRIAGE CONTROL CHARACTER #
Line S00045 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00051 M02S00045.ns22000 ---| ITEM LIN$HEAD C(00,06,37); # OPTIONAL HEADER MESSAGE #
Line S00046 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00052 M02S00046.ns22000 ---| ITEM LIN$DATE C(03,54,10); # CURRENT DATE #
Line S00047 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00053 M02S00047.ns22000 ---| ITEM LIN$TIME C(04,54,10); # CURRENT TIME #
Line S00048 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00054 M02S00048.ns22000 ---| ITEM LIN$PAGE C(06,06,04); # *PAGE* #
Line S00049 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00055 M02S00049.ns22000 ---| ITEM LIN$PAGENM C(06,30,06); # PAGE NUMBER # 00056 M01S00005.ns22000 +++| ITEM LIN$HEAD C(00,06,100); # OPTIONAL HEADER MESSAGE # 00057 M01S00006.ns22000 +++| ITEM LIN$DATE C(10,06,10); # CURRENT DATE # 00058 M01S00007.ns22000 +++| ITEM LIN$TIME C(11,06,10); # CURRENT TIME # 00059 M01S00008.ns22000 +++| ITEM LIN$PAGE C(12,18,04); # *PAGE* # 00060 M01S00009.ns22000 +++| ITEM LIN$PAGENM C(12,42,06); # PAGE NUMBER # 00061 M01S00050.comufmt +++| END 00062 M01S00051.comufmt +++| 00063 M01S00052.comufmt +++| ARRAY MSG [0:0] P(4); # USED FOR DAYFILE MESSAGES # 00064 M01S00053.comufmt +++| BEGIN 00065 M01S00054.comufmt +++| ITEM MSGITEM C(00,00,38); # MESSAGE DISPLAYED # 00066 M01S00055.comufmt +++| ITEM MSGZERO U(03,48,12) = [0]; # TERMINATES MESSAGE # 00067 M01S00056.comufmt +++| END 00068 M01S00057.comufmt +++| 00069 M01S00058.comufmt +++| ARRAY PRBUF [1:PRTABENT] S(PRBUFL); 00070 M01S00059.comufmt +++| ; # *CIO* BUFFER # 00071 M01S00060.comufmt +++|
Line S00061 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00072 M02S00061.ns22000 ---| ARRAY PRTABLE [1:PRTABENT] S(8); # PRINT TABLE # 00073 M01S00010.ns22000 +++| ARRAY PRTABLE [1:PRTABENT] S(PRTABLEN); # PRINT TABLE # 00074 M01S00062.comufmt +++| BEGIN 00075 M01S00063.comufmt +++| ITEM PRTLFN C(00,00,10); # REPORT FILE NAME # 00076 M01S00064.comufmt +++| ITEM PRTFETP U(00,42,18) = [PRTABENT(0)]; # ADDRESS OF 00077 M01S00065.comufmt +++| *FET*, PRESET 00078 M01S00066.comufmt +++| TO 0 # 00079 M01S00067.comufmt +++| ITEM PRTLINE U(01,00,18); # CURRENT LINE NUMBER # 00080 M01S00068.comufmt +++| ITEM PRTPAGE U(01,18,18); # CURRENT PAGE NUMBER # 00081 M01S00069.comufmt +++| ITEM PRTLINELIM U(01,42,18); # LINE LIMIT # 00082 M01S00070.comufmt +++| ITEM PRTDATE C(02,00,10); # CURRENT DATE # 00083 M01S00071.comufmt +++| ITEM PRTTIME C(03,00,10); # CURRENT TIME #
Line S00072 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00084 M02S00072.ns22000 ---| ITEM PRTHEADT C(04,00,37); # OPTIONAL HEADER MESSAGE #
Line S00073 Modification History | |
---|---|
M01 (Added by) | comufmt |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00085 M02S00073.ns22000 ---| ITEM PRTHEADP U(07,42,18); # HEADER PROCEDURE ADDRESS # 00086 M01S00011.ns22000 +++| ITEM PRTHEADT C(04,00,100); # OPTIONAL HEADER MESSAGE # 00087 M01S00012.ns22000 +++| ITEM PRTHEADP U(14,00,18); # HEADER PROCEDURE ADDRESS # 00088 M01S00074.comufmt +++| 00089 M01S00075.comufmt +++| END 00090 M01S00076.comufmt +++| 00091 M01S00077.comufmt +++| 00092 M01S00078.comufmt +++| END # UFMTCOM # 00093 M01S00079.comufmt +++| 00094 M01S00080.comufmt +++| END # COMUFMT # 00095 M01S00081.comufmt +++| 00096 M01S00082.comufmt +++| CONTROL LIST;
cdc/nos2.source/opl.opl871/common/comufmt.txt · Last modified: by 127.0.0.1