OOPSGUI2 ;WIOFO/CVW-RPC routines ;9/19/01
Source file <OOPSGUI2.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 |
|---|---|---|
| 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. |
| Name | Field # of Occurrence |
|---|---|
| ^%DT | DTI+2 |
| $$FIND1^DIC | DEFMD+22 |
| FILE^DICN | ADDWITN+14 |
| $$GET1^DID | REPLWP+11 |
| ^DIE | SETFIELD+14, ADDWITN+30, ADDWITN+32, EDTWITN+26, EDTWITN+28 |
| ^DIK | DELWITN+15 |
| $$EXTERNAL^DILFD | WITR+8, WITR+9, DEFMD+26 |
| $$ROOT^DILFD | REPLWP+10 |
| $$GET1^DIQ | GET+24, GET+26, GET+28, GET+29, GET+30, DEFMD+23, SETFIELD+18 |
| $$DTI^OOPSGUI2 | DTVALID+12, DTVALID+13 |
| CLSCASE^OOPSMBUL | SETFIELD+20 |
| WCPBOR^OOPSMBUL | SETFIELD+18 |
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | GET+17, GET+18, GET+19 |
| ^OOPS( | GET+13 |
| ^OOPS(2260 - [#2260] | WITR+6, WITR+7, WITR+13, DEFMD+13, SETFIELD+11, ADDWITN+9, DELWITN+11, EDTWITN+10 |
| ^OOPS(2262 - [#2262] | DEFMD+15, DEFMD+17, DEFMD+19, DEFMD+20, DEFMD+21, DEFMD+24, DEFMD+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | DTI+1~, DTI+2* |
| CITY | ADDWITN+6~, ADDWITN+20*, EDTWITN+6~, EDTWITN+16* |
| CNT | REPLWP+8~, REPLWP+16*, REPLWP+19*, REPLWP+22 |
| COMMENT | ADDWITN~, EDTWITN~ |
| COUNT | WITR+4~, WITR+5*, WITR+7, WITR+8, WITR+9, WITR+10, WITR+11, WITR+12*, WITR+13, WITR+14* |
| DA | SETFIELD+5~, SETFIELD+12*, ADDWITN+6~, ADDWITN+15*, ADDWITN+17, DELWITN+4~, DELWITN+13*, EDTWITN+6~, EDTWITN+12* |
| DA(1 | ADDWITN+10*, ADDWITN+11, ADDWITN+16, DELWITN+12*, DELWITN+14, EDTWITN+11*, EDTWITN+13 |
| DATA | REPLWP~ |
| DATA( | REPLWP+19, REPLWP+20 |
| DD | ADDWITN+6~ |
| DIC | ADDWITN+6~, ADDWITN+11* |
| DIC(0 | ADDWITN+12* |
| DIE | SETFIELD+5~, SETFIELD+12*, ADDWITN+6~, ADDWITN+16*, EDTWITN+6~, EDTWITN+13* |
| DIK | DELWITN+4~, DELWITN+14* |
| DLAYGO | ADDWITN+6~, ADDWITN+11* |
| DO | ADDWITN+6~ |
| DR | SETFIELD+5~, SETFIELD+6*, ADDWITN+6~, ADDWITN+16*, ADDWITN+31*, EDTWITN+6~, EDTWITN+11*, EDTWITN+27* |
| DR(1 | SETFIELD+13*, ADDWITN+24*, ADDWITN+25*, ADDWITN+26*, ADDWITN+27*, ADDWITN+28*, ADDWITN+29*, EDTWITN+20*, EDTWITN+21*, EDTWITN+22* , EDTWITN+23*, EDTWITN+24*, EDTWITN+25* |
| DT | REPLWP+22 |
| FIELD | REPLWP+8~, REPLWP+9*, REPLWP+11 |
| FILE | GET+7~, GET+12*, GET+13, GET+17, GET+18, GET+19, GET+24, GET+26, GET+27, REPLWP+8~ , REPLWP+9*, REPLWP+10, REPLWP+11 |
| FLAG | DTVALID~, DTVALID+8*, DTVALID+9, DTVALID+14, DTVALID+18, DTVALID+21, DTVALID+24, DTVALID+27 |
| FLDCNT | GET+7~, GET+10*, GET+31* |
| FLDNUM | SETFIELD+5~, SETFIELD+10*, SETFIELD+11, SETFIELD+13, SETFIELD+18, SETFIELD+20 |
| FNUM | GET+7~, GET+19*, GET+20, GET+24, GET+26, GET+28, GET+29, GET+30 |
| FORM | GET+7~, GET+10*, GET+12, GET+15, GET+16, GET+21, GET+23, GET+25 |
| IDT | DTVALID~, DTVALID+10, DTVALID+12*, DTVALID+15*, DTVALID+16, DTVALID+17, DTVALID+19, DTVALID+20, DTVALID+22, DTVALID+23 , DTVALID+25, DTVALID+26, DTVALID+28*, DTVALID+29, DTVALID+30 |
| IEN | GET+7~, GET+10*, GET+11, GET+13, GET+14, GET+24, GET+26, GET+28, GET+29, GET+30 , WITR~, WITR+6, WITR+7, WITR+13, DEFMD~, DEFMD+12, DEFMD+13, REPLWP+8~, REPLWP+9*, SETFIELD+5~ , SETFIELD+8*, SETFIELD+9, SETFIELD+11, SETFIELD+12, SETFIELD+18, SETFIELD+20, ADDWITN~, ADDWITN+8, ADDWITN+9, ADDWITN+10 , DELWITN+4~, DELWITN+7*, DELWITN+8, DELWITN+11, DELWITN+12, EDTWITN+6~, EDTWITN+8*, EDTWITN+10, EDTWITN+11 |
| INFO | ADDWITN~, ADDWITN+13, ADDWITN+18, ADDWITN+19, ADDWITN+20, ADDWITN+21, ADDWITN+22, ADDWITN+23, EDTWITN~, EDTWITN+14 , EDTWITN+15, EDTWITN+16, EDTWITN+17, EDTWITN+18, EDTWITN+19 |
| INPUT | GET~, GET+10, REPLWP~, REPLWP+9, SETFIELD~, SETFIELD+8, SETFIELD+10, ADDWITN+6~, DELWITN~, DELWITN+6 , DELWITN+7, DELWITN+9, EDTWITN~, EDTWITN+8, EDTWITN+9 |
| INVFLDS | GET+7~, GET+9*, GET+12*, GET+20 |
| LINE | REPLWP+8~, REPLWP+16*, REPLWP+18, REPLWP+19*, REPLWP+20 |
| NAME | ADDWITN+6~, ADDWITN+18*, EDTWITN+6~, EDTWITN+14* |
| NEWTXT | REPLWP+8~, REPLWP+17!, REPLWP+20*, REPLWP+21 |
| NODE | GET+7~, GET+17*, GET+18, GET+19, GET+21, GET+23, GET+25, REPLWP+8~, REPLWP+11*, REPLWP+12* |
| PDT | DTVALID~, DTVALID+11, DTVALID+13*, DTVALID+15*, DTVALID+16, DTVALID+17, DTVALID+19, DTVALID+20, DTVALID+22, DTVALID+23 , DTVALID+25, DTVALID+26, DTVALID+28*, DTVALID+29, DTVALID+30 |
| PIECE | GET+7~, GET+18*, GET+19 |
| PIEN | DEFMD+9~, DEFMD+10*, DEFMD+15*, DEFMD+16, DEFMD+17, DEFMD+19, DEFMD+20, DEFMD+21, DEFMD+24, DEFMD+25 |
| PSTA | DEFMD+9~, DEFMD+10*, DEFMD+22*, DEFMD+23* |
| RESULTS | GET~, GET+14*, GET+16*, WITR~, DEFMD~, REPLWP~, DTVALID~, SETFIELD~, ADDWITN~, DELWITN~ , EDTWITN~ |
| RESULTS( | GET+24*, GET+26*, GET+28*, GET+29*, GET+30*, WITR+7*, WITR+8, WITR+9, WITR+10*, WITR+11* , WITR+13* |
| RESULTS(0 | DEFMD+11*, DEFMD+18*, DTVALID+9*, DTVALID+10*, DTVALID+11*, DTVALID+16*, DTVALID+17*, DTVALID+19*, DTVALID+20*, DTVALID+22* , DTVALID+23*, DTVALID+25*, DTVALID+26*, DTVALID+29*, DTVALID+30*, SETFIELD+7*, SETFIELD+16*, ADDWITN+7*, ADDWITN+33*, DELWITN+5* , DELWITN+17*, EDTWITN+7*, EDTWITN+29* |
| RESULTS(1 | GET+14*, GET+16*, DEFMD+19* |
| RESULTS(2 | DEFMD+20* |
| RESULTS(3 | DEFMD+21* |
| RESULTS(4 | DEFMD+23* |
| RESULTS(5 | DEFMD+24* |
| RESULTS(6 | DEFMD+25*, DEFMD+26* |
| ROOT | REPLWP+8~, REPLWP+10*, REPLWP+14, REPLWP+21, REPLWP+22 |
| STA | DEFMD+9~, DEFMD+10*, DEFMD+13*, DEFMD+14, DEFMD+15, DEFMD+22 |
| STATE | WITR+4~, WITR+5*, WITR+8*, WITR+10, ADDWITN+6~, ADDWITN+21*, EDTWITN+6~, EDTWITN+17* |
| STREET | ADDWITN+6~, ADDWITN+19*, EDTWITN+6~, EDTWITN+15* |
| SUBN | WITR+4~, WITR+5*, WITR+6*, WITR+7, WITR+11, WITR+13 |
| U | GET+10, WITR+8, WITR+9, WITR+10, WITR+11, DEFMD+13, DEFMD+17, DEFMD+19, DEFMD+20, DEFMD+21 , DEFMD+24, DEFMD+25, REPLWP+9, SETFIELD+8, SETFIELD+10, ADDWITN+13, ADDWITN+18, ADDWITN+19, ADDWITN+20, ADDWITN+21 , ADDWITN+22, ADDWITN+23, DELWITN+7, DELWITN+9, EDTWITN+8, EDTWITN+9, EDTWITN+14, EDTWITN+15, EDTWITN+16, EDTWITN+17 , EDTWITN+18, EDTWITN+19 |
| VALUE | SETFIELD~, SETFIELD+20 |
| VAR | GET+7~ |
| WDT | WITR+4~, WITR+5*, WITR+9*, WITR+10 |
| WITDATE | ADDWITN+6~, ADDWITN+23*, EDTWITN+6~, EDTWITN+19* |
| WITNO | DELWITN+4~, DELWITN+9*, DELWITN+10, DELWITN+11, DELWITN+13, EDTWITN+6~, EDTWITN+9*, EDTWITN+10, EDTWITN+12 |
| X | DTI~, ADDWITN+13* |
| Y | DTI+1~, DTI+3, SETFIELD+15, ADDWITN+15, DELWITN+16 |
| ZIP | ADDWITN+6~, ADDWITN+22*, EDTWITN+6~, EDTWITN+18* |