PRCHCS2 ;WISC/RHD-BUILD LOG CODE SHEET DATA ;12/1/93 09:51
Source file <PRCHCS2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| V | ;;5.1;IFCAP;;Oct 20, 2000
|
|
| COM | ;S PRCHCOM=$S($D(^PRC(441.2,+$P(PRCH2,U,3),0)):$P(^(0),U,4),1:"") Q
|
|
| NOM | ||
| MAX | ||
| MAND | ||
| M2 | ||
| DOCID | ;SET DOCUMENT IDENTIFIER TO COMMON NO.(PAT) OR REQUISITION NO. IF SOURCE 1 (DEPOT)
|
|
| AMT | ;SET X=AMOUNT ORDERED INCLUDING TERM & TRADE DISCOUNTS, AND SHIPPING/HANDLING CHARGES.
|
|
| B500 | ;POSTED ACQUISITIONS TRX# 630,500,504
|
|
| B100 | ;DLA ACQUISITIONS TRX# 100
|
|
| B501 | ;UNPOSTED ACQUISITION--SOURCE 1 (DEPOT) TRX# 501,505,510,514,515
|
|
| B700 | ;UNPOSTED ACQUISITION--SOURCE 3 (GSA) TRX# 700
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRC(440 - [#440] | MAND, MAND+1 |
| ^PRC(441.2 - [#441.2] | COM+1 |
| ^PRC(442 - [#442] | DOCID+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> PRCFLN | NOM+2* |
| >> PRCH0 | MAX, M2 |
| >> PRCH2 | COM+1, AMT+1 |
| >> PRCH4 | NOM+2, M2 |
| >> PRCHCOM | COM+1*, NOM |
| >> PRCHCS("MAND" | MAND*, MAND+1*, M2 |
| >> PRCHCS("MAX" | MAX* |
| >> PRCHDIET | NOM+1*, NOM+2 |
| >> PRCHEST | AMT+2 |
| >> PRCHI0 | NOM, MAND, MAND+1 |
| >> PRCHIV0 | MAX |
| >> PRCHPO | DOCID+1 |
| >> PRCHS("T" | AMT+2 |
| >> PRCHTP(1 | B500+1*, B100+1*, B100+2*, B100+3*, B501+1*, B700+1* |
| >> PRCHTP(2 | B500+2*, B500+3*, B500+4*, B100+4*, B100+5*, B501+2*, B501+3*, B700+2*, B700+3*, B700+4* |
| PRCHZ | NOM+2*! |
| U | COM+1, NOM, NOM+2, MAX, MAND, MAND+1, M2, DOCID+1, AMT+1 |
| >> X | NOM*, NOM+2*, MAX*, MAND*, DOCID+1*, AMT+1*, AMT+2*, AMT+3* |
| Y | NOM+2*! |
