OOPSGUIC ;WIOFO/LLH-RPC routine for GET/SET CA7 ;04/22/04
Source file <OOPSGUIC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CA7LIST(RESULTS,PERSON,CALL) | ; builds CA-7 selection list from existing
; cases - not an add |
|
| SORT | ; reverse the order
|
|
| LISTCA(RESULTS,INPUT) | ; returns a list of valid CA (1 or 2) claims that
; can be selected to create a new CA-7 ; Input: INPUT - 3 pieces to input parameter ; SSN^FILE^CALLER - CALLER contains either E ; or W (menu called from). ; FILE now only contains 2260 (for CA-1 or 2) ; Output: RESULTS - contains a array of ASISTS Claims with the ; claim number, name, and date of injury. Other ; default fields returned are, grade, step, pay amt, ; pay period, FEGLI Code, and Health Ins. |
|
| INCLUDE() | ; checks to make sure ok to include claim in list
|
|
| PDDEF() | ; get Fegli Code and Health insurance fields from paid
|
|
| MULTIPLE(RESULTS,INPUT,DATA) | ; retrieve data from multiple
; NOTE: When filing into subrecord, the entire subrecord is deleted ; then rebuilt. Also, the field number for the subrecord ; must be passed with the data. ; WORD PROCESSING fields CANNOT file using this code ; Input: INPUT - in the format FILE^FIELD^IEN ; DATA - array of data in the format ; DATA(SIEN)=data where data = P1^P2^P3 etc, where ; P1 = subfield #;data ; DATA="" must be true for a GET. ; Output: RESULTS - data from all records in the multiple will ; be returned. it will be saved in a pieced ; string. |
|
| GETD | ; get the data
|
|
| KILLD | ; first kill all records in subfile, then rebuild
|
|
| SETD | ; subrecord cleaned out, now rebuild
|
|
| MFILE | ; file the multiple
|
|
| OSHA300(RESULTS,STA,DATA) | ; Files data into subrecord 2262.315
; Input - STA is the station number subrecord IEN ; DATA is an number subscripted array containing the records ; that contain the Emp Numbers and hours worked in the ; OSHA MONTH/YEAR subrecord. ; Output - RESULTS indicating the success of the filing. |
|
| FLD15 | ; retrieves OSHA 300A Summary data from file 2262
|
|
| FLD95 | ; sort Incident Outcomes so they display in chron order OOPS*25
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| RPC Name | Call Tags |
|---|---|
| OOPS SELECT CA7 | CA7LIST |
| OOPS LIST CAS | LISTCA |
| OOPS MULTIPLE DATA | MULTIPLE |
| OOPS SET OSHA300A | OSHA300 |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^OOPS(2260 - [#2260] | GET1^DIQ |
| ^PRSPC - [#450] | FIND^DIC |
