| ASTR |
This component is called when creating a detailed
purchase card order in order to set the DESCRIPT.
ASTR. (#7) field to "*" in the line items that do
not contain a CONTRACT/BOA # (#4) in the case that
some line items have CONTRACT/BOA #'s and some do
not.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PRCHPO |
Input |
File 442 IEN
|
PRCHSC |
Input |
SOURCE CODE (#8) of file 442 entry
|
|
CHG |
This component is called when creating a detailed
purchase card order. If the ITEM MASTER FILE NO.
(#1.5) is not present and there is no DESCRIPTION
(#1) in the ITEM multiple (#442.01) of the file 442
entry, then fields DESCRIPTION LINE COUNT (#6) and
DESCRIPT. ASTR. (#7) are set to null, and a message
that "Line item"_LINE ITEM NUMBER (#.01)_" is
missing its description" is sent. LINE ITEM NUMBER
(#.01) from the ITEM multiple (#442.01) is set to
the next value, and several cross-references are
updated.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PRCH |
Input |
Item (#442.01) IEN
|
PRCHPO |
Input |
File 442 IEN
|
I |
Input |
Value of LINE ITEM NUMBER
|
PRCHER |
Output |
Error Indicator
|
|
CN |
This component is called when creating a detailed
purchase card order in order to process the
CONTRACT/BOA #'s (#4) in the ITEM multiple and
to create the "AC" cross-reference for
CONTRACT/BOA #'s.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PRCHCN |
Input |
File 442 sub-file 442.01 field #4 CONTRACT/BOA #
|
PRCH('AM',PRCHCN) |
Output |
Array of CONTRACT/BOA # field (#4) and amount data
from the ITEM multiple (#442.01) of file 442
For the CN subroutine, the PRCH('AM',PRCHCN) array is populated for each line
item that has a CONTRACT/BOA # (#4) in the ITEM multiple (#442.01) of file
442.
|
PRCHEC |
Output |
Count of PRCH("AM",PRCHCN) array entries
|
PRCHL3 |
Output |
Contract #
|
PRCHPO |
Input |
IEN of file 442 entry
|
PRCHAM |
Input |
TOTAL COST field (#15) from the ITEM multiple
(#442.01) of file 442 which is added to the running total for each
CONTRACT/BOA # (#4) in the second caret-piece of the PRCH("AM",PRCHCN) entry
|
PRCH |
Input |
IEN of the ITEM multiple (#442.01) being processed
|
|
MISS |
This component checks for missing fields in each ITEM
multiple (#442.01) in the detailed purchase card order
being created.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PRCH('COUNT',PRCH) |
Input |
Array of ITEM multiple (#442.01) entries for this
PROCUREMENT & ACCOUNTING TRANSACTIONS file (#442) entry
|
J |
Input |
Number of entries in the PRCH("COUNT") array
|
I |
Input |
Number of entries in the PRCH("AM") array
|
PRCH('AM') |
Input |
Array containing running balances of TOTAL AMOUNT for
each CONTRACT/BOA # (#4) in the ITEM multiple (#442.01) in this file 442 entry
|
PRCH |
Input |
File 442 ITEM multiple (#442.01) IEN
|
|
OM |
This component processes ITEM (#442.01) entries
in file 442 that have no CONTRACT/BOA # (#4).
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PRCHLI |
Used |
Loop Control value when processing the ITEM multiple
(#442.01) of the PROCUREMENT & ACCOUNTING TRANSACTIONS file (#442) in
subroutine MISS^PRCHNPO
This value is stored in the third caret-piece of the PRCH("AM",".OM") array as
each ITEM (#442.01) entry from file 442 is processed in subroutine OM.
|
PRCH |
Output |
Array of CONTRACT/BOA # field (#4) and amount data in
the ITEM multiple (#442.01) of file 442
For the OM subroutine, the PRCH('AM','.OM') array is populated for each line
item that has no CONTRACT/BOA # (#4) in the ITEM multiple (#442.01) of file
442.
|
PRCHEC |
Output |
Count of PRCH("AM",".OM") array entries
|
PRCHL3 |
Output |
Assigned string value ".OM"
|
PRCHAM |
Input |
TOTAL COST field (#15) from the ITEM multiple
(#442.01) of file 442 which is added to the running total for the in the
second caret-piece of the PRCH("AM",".OM") entry
|
|