RCBEUTRA ;WISC/RFJ-utilties for transactions (in file 433) ;1 Jun 00
Source file <RCBEUTRA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADD433(BILLDA,TRANTYPE) | ; add a new transaction to file 433 (silent)
; return: ien of 433 transaction or 0^error msg ; : ^prca(433,ien) will be locked if entry selected ; Input - optional variable RCDUZ for the processed by user. SET in ^RCDPEAP from MARKED FOR AUTOPOST USER. PRCA*4.5*326 |
|
| FY433(RCTRANDA) | ; transfer fiscal year multiple from 430 to 433
; bill number must be stored in file 433, field .03 before calling |
|
| FYMULT(RCTRANDA) | ; apply payment to fy multiple, oldest first
|
|
| EDIT433(RCTRANDA,DR) | ; edit the field in 433 with the DR string passed
|
|
| PROCESS(RCTRANDA) | ; mark transaction as processed
|
|
| INCOMPLE(RCTRANDA) | ; opposite of processed, make a transaction incomplete
|
|
| DEL433(RCTRANDA,COMMENT,ARCHIVE) | ; delete (mark incomplete) in file 433
; comment is the user comment in field 41 (default USER CANCELLED) ; archive is set to 1 if called to archive transaction |
|
| ADDCOMM(RCTRANDA,COMMENT) | ; automatically put a comment on a transaction
; comment in the array comment(1)=first line ; comment(2)=second line |
|
| FMSDATE(X) | ;Finds the next month & year and sets the date for transmission
|
|
| QUIT |
| FileNo | Call Tags |
|---|---|
| ^PRCA(433 - [#433] | Classic Fileman Calls |
