OOPSGUI2 ;WIOFO/CVW-RPC routines ;9/19/01
Source file <OOPSGUI2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GET(RESULTS,INPUT) | ; Get Case data from 2260 or 2264
|
|
| WITR(RESULTS,IEN) | ||
| DEFMD(RESULTS,IEN) | ||
| REPLWP(RESULTS,INPUT,DATA) | ;
|
|
| DTVALID(RESULTS,IDT,PDT,FLAG) | ;Compare Date(s)/Time(s)
; Input IDT - This is the base date/time in external form ; PDT - This is the compare date/time in external form ; FLAG - -2 means PDT must be < IDT (The DAY only) ; FLAG - -1 means PDT must be < IDT (The DAY&TIME) ; FLAG - 1 means PDT must be > IDT (The DAY&TIME) ; FLAG - 2 means PDT must be > IDT (The DAY only) |
|
| DTI(X) | ;Convert and External date to an internal one
|
|
| SETFIELD(RESULTS,INPUT,VALUE) | ;Set a single field in file 2260
|
|
| ADDWITN(RESULTS,IEN,INFO,COMMENT) | ;Add Witness info for IEN in 2260
; Input - IEN - IEN of case that needs witness info created. ; INFO - Name, Street, City, State, Zip, Date of Witness in ; format, NAME^STREET^CITY^STATE^ZIP ; COMMENT - Witness Comment Text ; Output - RESULTS Text indicating status of insert |
|
| DELWITN(RESULTS,INPUT) | ;Deletes the Witness information for a claim
; Input - INPUT, this is the IEN for the case and the witness number ; format IEN^witness number for the selected witness ; Output - RESULTS - String indicating the status of the delete |
|
| EDTWITN(RESULTS,INPUT,INFO,COMMENT) | ;Update Witness Info for 2260 rec
; Input:INPUT - IEN and Witness Number in format IEN^WIT ; INFO - Name, Street, City, State, Zip, Date of Witness in ; format, NAME^STREET^CITY^STATE^ZIP ; COMMENT - Text of Witness comment ; Output:RESULTS - String listing result of update. |
| RPC Name | Call Tags |
|---|---|
| OOPS GET 2260 DATA | GET |
| OOPS GET WITNESSES | WITR |
| OOPS GET DEFAULT MD | DEFMD |
| OOPS REPLACE WP | REPLWP |
| OOPS VALIDATE TIME | DTVALID |
| OOPS SET FIELD | SETFIELD |
| OOPS DELETE WITNESS | DELWITN |
| OOPS WITNESS CREATE | ADDWITN |
| OOPS WITNESS EDIT | EDTWITN |
| OOPS WITNESS DELETE | DELWITN |
