PRCFFUD1 ;WISC/SJG-UTILITY FOR CARRY FORWARD ;3/27/96 15:14
Source file <PRCFFUD1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN() | ;
|
|
REQ | ; 2237 Request on Purchase Order
|
|
NOREQ | ; No 2237 Request on Purchase Order
|
|
QUIT | ||
DT442(A,B,C,D) | ; set up prcfa(bbfy),prc(site),prc(fy),prc(qtr),prc(cp),prcfa(request),prc(rbdt),prc(bbfy),prc(podt),prc(amendt)
|
|
DTOBL(A,B) | ;ef = default obligation date
|
|
OBLDAT(A,B) | ; a new subroutine added as part of PRC*5.1*58.
; This new subroutine will enable the software to look for ; amendment funds in the correct fiscal quarter. The NOIS ; addressed by this code is LAH-0602-61845. |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRC( | DT442+3, DT442+4, DT442+8 |
^PRCS(410 - [#410] | DT442+7 |
Name | Field # of Occurrence |
---|---|
^(23 | DT442+8 |
^(3 | DT442+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | DT442~, DT442+3, DT442+4, DT442+6, DT442+8, DTOBL~, DTOBL+1, OBLDAT~, OBLDAT+5 |
AMENDT | OBLDAT+5*, OBLDAT+6, OBLDAT+8! |
B | DT442~, DT442+4*, DT442+5, DT442+8, DTOBL~, DTOBL+1, OBLDAT~, OBLDAT+5 |
C | DT442~, DT442+2 |
D | DT442~, DT442+3 |
DT | DTOBL+1, OBLDAT+6 |
>> OBLDAT | OBLDAT+6*, OBLDAT+7*, OBLDAT+9 |
OPENQTR | EN+1~, EN+3*, REQ+2, REQ+3, REQ+4, NOREQ+2 |
>> PO | EN+4, EN+5 |
PODATE | EN+1~, EN+5*, REQ+3, REQ+4, NOREQ+2, NOREQ+3 |
>> PRC("AMENDT" | DT442+3* |
>> PRC("BBFY" | DT442+9* |
>> PRC("CP" | DT442+7*, DT442+8*, DT442+11 |
>> PRC("FY" | DT442+7*, DT442+8*, DT442+10, DT442+11, OBLDAT+6 |
>> PRC("FYQDT" | DT442+10* |
>> PRC("PODT" | DT442+8* |
>> PRC("QTR" | DT442+7*, DT442+8*, DT442+10, DT442+11 |
>> PRC("RBDT" | DT442+5*, DT442+7*, DT442+11* |
>> PRC("SITE" | EN+3, DT442+7*, DT442+8*, DT442+11 |
PRCA | DT442+1~, DT442+2*, DT442+3, DT442+4, DT442+6, DT442+8 |
>> PRCFA("BBFY" | DT442+7*, DT442+8*, DT442+9*, DT442+11 |
>> PRCFA("REQUEST" | DT442+5*, DT442+7 |
PRIMARY | EN+1~, EN+4*, REQ+1, NOREQ+1 |
RBDT | OBLDAT+5*, OBLDAT+7, OBLDAT+8! |
>> RETDATE | EN+2*, REQ+2*, REQ+3*, REQ+4*, NOREQ+2*, NOREQ+3*, QUIT*, QUIT+1 |
U | DT442+3, DT442+5, DT442+7, DT442+8, DT442+11 |
>> X | REQ+4, NOREQ+2, QUIT |
Z | DT442+1~, DT442+7*, DT442+8* |