PRCPSFSV ;WOIFO/RFJ,LKG-create fms sv adjustment code sheet ;7/8/05 10:11
Source file <PRCPSFSV.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 |
|---|---|---|
| SV(INVPT,TRANID,TRANDATE,STACKDA) | ; create fms sv document for adjustment
; tranid=transaction register id number ; pass trandate for optional FMS acctg period, otherwise it uses the ; transaction date ; pass stackda for regeneration of document ; loop transaction register for adjusted items ; variables required: ; prcpwbfy = whse beg fy ; prcpwfcp = whse fcp ; prcpwsta = whse station # |
|
| SVCOTS | ;Entry point for SV from COTS inventory transaction
; set up document variables ; table=^^xprogram(fcp/prj)^^linefund^beginfy^endfy^^^job |
|
| TRANTYPE(TYPE,ACCT) | ; return transaction type based on type (1-7) and acct
; type=1:transfer stock to VAMC whse ; type=2:sale of stock to OGA ; type=3:transfer excess stock to GSA ; type=4:adjustment to stock valuation ; type=5:writeoff damaged stock ; type=6:transfer transportation to stock ; type=7:inventory refund adjustment |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRCP(445.2 - [#445.2] | SV+11, SV+16 |
| Name | Line Occurrences |
|---|---|
| $$TRANTYPE | SVCOTS+23 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACCT | SV+9~, SV+15*, SV+18, SV+19, SVCOTS+20*, SVCOTS+23, TRANTYPE~, TRANTYPE+8, TRANTYPE+9, TRANTYPE+10 , TRANTYPE+11, TRANTYPE+12, TRANTYPE+13, TRANTYPE+14 |
| BFY | SV+9~, SVCOTS+4*, SVCOTS+5, SVCOTS+23 |
| DATA | SV+9~, SV+11*, SV+12, SV+13, SV+14, SV+15, SV+16 |
| DT | SVCOTS+3 |
| EFY | SV+9~, SVCOTS+4*, SVCOTS+5*, SVCOTS+23 |
| FUND | SV+9~, SVCOTS+4*, SVCOTS+23 |
| GECSFMS | SV+9~ |
| GECSFMS("DA" | SVCOTS+10*, SVCOTS+11, SVCOTS+17, SVCOTS+26, SVCOTS+28 |
| INVCOST | SV+9~, SV+13*, SV+17, SV+18, SVCOTS+20*, SVCOTS+21*, SVCOTS+25 |
| INVPT | SV~, SV+11 |
| LINE | SV+9~, SVCOTS+20*, SVCOTS+22*, SVCOTS+23 |
| LINEDOC | SV+9~, SVCOTS+14*, SVCOTS+15*, SVCOTS+16*, SVCOTS+17, SVCOTS+23*, SVCOTS+24*, SVCOTS+25*, SVCOTS+26 |
| PRCPFMS | SV+9~, SV+10!, SV+20 |
| PRCPFMS( | SV+18*, SV+19!, SVCOTS+20 |
| PRCPSEC1 | SV+9~, SVCOTS+8*, SVCOTS+9, SVCOTS+10 |
| >> PRCPWBFY | SVCOTS+3 |
| >> PRCPWFCP | SVCOTS+3 |
| >> PRCPWSTA | SVCOTS+3, SVCOTS+8, SVCOTS+9, SVCOTS+23, SVCOTS+29 |
| REASON | SV+9~, SV+16*, SV+18, SV+19, SVCOTS+20*, SVCOTS+23 |
| SIGN | SV+9~, SVCOTS+21*, SVCOTS+25 |
| STACKDA | SV~, SVCOTS+9, SVCOTS+10, SVCOTS+29 |
| TABLE | SV+9~, SVCOTS+3*, SVCOTS+4 |
| TOTAL | SV+9~, SV+11*, SV+17*, SVCOTS+16 |
| TRANDA | SV+9~, SV+11*, SV+16 |
| TRANDATE | SV~, SV+14*, SVCOTS+14 |
| TRANID | SV~, SV+11, SVCOTS+9, SVCOTS+10, SVCOTS+11, SVCOTS+29 |
| TYPE | TRANTYPE~, TRANTYPE+8, TRANTYPE+9, TRANTYPE+10, TRANTYPE+11, TRANTYPE+12, TRANTYPE+13, TRANTYPE+14 |
| XPROG | SV+9~, SVCOTS+4*, SVCOTS+23 |
