PRCFFUC ;WISC/SJG-UTILITY ROUTINE FOR HOLD FUNCTIONALITY ;7/24/00 23:13
Source file <PRCFFUC.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 |
|---|---|---|
| V | ;;5.1;IFCAP;;Oct 20, 2000
|
|
| CURRENT | ; Determine current and user-entered accounting periods
|
|
| ACCPD | ; Prompt for default accounting period
|
|
| CHECK | ; Edit checking accounting period, obligation processing date, etc.
|
|
| NACCPD | ; Prompt for new accounting period
|
|
| N1 | ||
| SETUP | ; Backs up one accounting period
|
|
| CHGOBL | ; Change Obligation Processing Date
|
|
| CHG1 | ||
| ACCPDMO(A) | ; Determine accounting period (calendar -> fiscal)
|
|
| MONTH(X,Y) | ; Determine external form of month
|
|
| TRANS(X) | ; Returns date in xx/xx/xx format
|
|
| PARTS(AA,BB) | ; Breaks out date into components
|
|
| M1 | ||
| M2 | ||
| K1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | N1*!, CHGOBL+6*, CHGOBL+7! |
| %DT("A" | N1*, CHGOBL+6* |
| %DT("B" | CHGOBL+6* |
| A | ACCPDMO~, ACCPDMO+1 |
| AA | PARTS~, PARTS+2 |
| AP | N1+4~* |
| >> APCKDT | CHGOBL+8*, CHGOBL+9 |
| BB | PARTS~, PARTS+4*, PARTS+5* |
| CHKDT | ACCPD+1~, ACCPD+8*, ACCPD+9*, ACCPD+10 |
| >> CURDT | CURRENT+4*, ACCPD+2, ACCPD+8 |
| CYR | PARTS+1~, PARTS+3*, PARTS+4 |
| DATE | CURRENT+1~, CURRENT+2, CURRENT+3, CHGOBL+9, ACCPDMO+1~*, ACCPDMO+2, PARTS+1~, PARTS+2*, PARTS+3, PARTS+4 |
| >> DATEZ | CURRENT+3 |
| >> DEFDT | CURRENT+3*, CURRENT+4*, ACCPD+9 |
| DIR | ACCPD+22!, NACCPD+7!, CHGOBL+1~, CHGOBL+4!, CHG1+2! |
| DIR("0" | NACCPD+2* |
| DIR("?" | ACCPD+19*, ACCPD+20*, ACCPD+21*, NACCPD+6* |
| DIR("??" | NACCPD+6* |
| DIR("A" | ACCPD+4*, ACCPD+5*, ACCPD+6*, ACCPD+7*, ACCPD+12*, ACCPD+13*, ACCPD+14*, ACCPD+15*, ACCPD+16*, ACCPD+18* , NACCPD+3*, NACCPD+4*, CHGOBL+3*, CHG1+1* |
| DIR("B" | ACCPD+22*, NACCPD+5*, CHGOBL+2*, CHG1* |
| DIR(0 | ACCPD+3*, CHGOBL+2*, CHG1* |
| DIRUT | ACCPD+23, CHGOBL+4, CHG1+2, K1! |
| DTOUT | NACCPD+8, K1! |
| DUOUT | NACCPD+8, K1! |
| >> EXIT | ACCPD+23*, NACCPD+8* |
| >> EXIT1 | ACCPD+24*, M2* |
| EXTMO | PARTS+1~, PARTS+3*, PARTS+4 |
| FYR | PARTS+1~, PARTS+3*, PARTS+4 |
| >> HELP | NACCPD+1*, NACCPD+9 |
| MO | PARTS+1~, PARTS+3* |
| >> NFYR | N1+1* |
| >> PARTDT | CURRENT+2*, CURRENT+4*, ACCPD+2, CHGOBL+8* |
| >> PRCFA("ACCPD" | CURRENT+2*, ACCPD+5, ACCPD+6, NACCPD+5, N1+2*, N1+3*, N1+4*, SETUP+2, SETUP+5* |
| >> PRCFA("ACCPDCK" | CURRENT+2*, CHGOBL+9* |
| >> PRCFA("CURRENT" | CURRENT+3* |
| >> PRCFA("MOD" | ACCPD+8, ACCPD+9 |
| >> PRCFA("OBLDATE" | CURRENT+2, ACCPD+10, CHGOBL+5, CHGOBL+8* |
| RESP | ACCPD+1~, ACCPD+3*, ACCPD+12*, ACCPD+22 |
| S1 | ACCPD+1~, ACCPD+2*, ACCPD+10*, ACCPD+11, ACCPD+22! |
| S2 | ACCPD+1~, ACCPD+2*, ACCPD+10*, ACCPD+11, ACCPD+22! |
| S3 | ACCPD+1~, ACCPD+2*, ACCPD+3 |
| STAR | ACCPD+12~*, ACCPD+16 |
| U | ACCPD+2, ACCPD+5, ACCPD+6, ACCPD+8, ACCPD+9, ACCPD+10, NACCPD+5, NACCPD+11, N1+1, N1+2 , N1+3, N1+4, SETUP+2, ACCPDMO+2, MONTH+1, TRANS+1, PARTS+3, PARTS+4, PARTS+5 |
| >> URESP | NACCPD+10*, NACCPD+11*, N1+1*, N1+2 |
| URESPX | NACCPD+10*, NACCPD+11! |
| X | CURRENT+4, N1+3*, SETUP+1~, SETUP+5*, MONTH~, MONTH+1, TRANS~, TRANS+1, PARTS+5* |
| X1 | SETUP+1~, SETUP+2* |
| X2 | SETUP+1~, SETUP+3* |
| X3 | SETUP+1~, SETUP+2*, SETUP+3 |
| Y | ACCPD+24, NACCPD+10, NACCPD+11!, N1, N1+1, N1+3, CHGOBL+1~, CHGOBL+4, CHGOBL+5*, CHGOBL+6 , CHGOBL+7, CHGOBL+8, CHG1+2, MONTH~, MONTH+1*, MONTH+2, PARTS+5 |
| Y(0 | NACCPD+10 |
| >> YY | ACCPD+3*, ACCPD+4 |
| Z | SETUP+1~, SETUP+5 |