Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: OOPSGUIC

Package: Asists

Routine: OOPSGUIC


Information

OOPSGUIC ;WIOFO/LLH-RPC routine for GET/SET CA7 ;04/22/04

Source Information

Source file <OOPSGUIC.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 9 DD^%DT  FIND^DIC  FILE^DICN  $$GET1^DID  UPDATE^DIE  ^DIK  CLEAN^DILF  $$ROOT^DILFD  
($$GET1,GETS)^DIQ  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Asists 4 OOPS LIST CAS  OOPS MULTIPLE DATA  OOPS SELECT CA7  OOPS SET OSHA300A  

Entry Points

Name Comments DBIA/ICR reference
SORT ; reverse the order
CA7LIST(RESULTS,PERSON,CALL) ; builds CA-7 selection list from existing
; cases - not an add
FLD15 ; retrieves OSHA 300A Summary data from file 2262
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.
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
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.
PDDEF() ; get Fegli Code and Health insurance fields from paid
KILLD ; first kill all records in subfile, then rebuild
INCLUDE() ; checks to make sure ok to include claim in list
MFILE ; file the multiple
FLD95 ; sort Incident Outcomes so they display in chron order OOPS*25
SETD ; subrecord cleaned out, now rebuild

External References

Name Field # of Occurrence
DD^%DT FLD15+6
FIND^DIC PDDEF+3
FILE^DICN MFILE+7, MFILE+9
$$GET1^DID MULTIPLE+20, MULTIPLE+21, MULTIPLE+22, SETD+10
UPDATE^DIE OSHA300+24
^DIK KILLD+3
CLEAN^DILF PDDEF+4
$$ROOT^DILFD MULTIPLE+19
$$GET1^DIQ CA7LIST+14, CA7LIST+21, SORT+6, SORT+8, SORT+9, SORT+10, LISTCA+19, LISTCA+20, LISTCA+21, LISTCA+30
, LISTCA+31, LISTCA+32, LISTCA+33, LISTCA+34, LISTCA+35, LISTCA+36, LISTCA+37, LISTCA+38, INCLUDE+4, INCLUDE+6
GETS^DIQ GETD+8, FLD95+3
$$FMTE^XLFDT SETD+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: (menu
  • Line Location: LISTCA+4
Routine Call
  • DIE
  • Line Location:
    • OSHA300+24
Routine Call
  • DIC
  • Line Location:
    • PDDEF+3

Used in RPC

RPC Name Call Tags
OOPS SELECT CA7 CA7LIST
OOPS LIST CAS LISTCA
OOPS MULTIPLE DATA MULTIPLE
OOPS SET OSHA300A OSHA300

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^OOPS(2260 - [#2260] GET1^DIQ
^PRSPC - [#450] FIND^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OOPS( CA7LIST+17, CA7LIST+19, LISTCA+17
^OOPS(2260 - [#2260] MULTIPLE+36, MULTIPLE+37
^OOPS(2262 - [#2262] OSHA300+14, OSHA300+16!, FLD15+4, FLD15+5
^TMP("CA7LIST" CA7LIST+8!, CA7LIST+12*, CA7LIST+13*, CA7LIST+16*, SORT+2*, SORT+3*, SORT+11*, SORT+14
^TMP("DILIST" PDDEF+5, PDDEF+6
^TMP("LISTCA" LISTCA+11!, LISTCA+15*, LISTCA+24*, LISTCA+25, LISTCA+43*, LISTCA+45

Label References

Name Line Occurrences
$$INCLUDE LISTCA+18
$$PDDEF LISTCA+41
FLD15 GETD+5
FLD95 GETD+7
GETD MULTIPLE+41
KILLD MULTIPLE+42
MFILE SETD+14
SETD MULTIPLE+42

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT OSHA300+26!
ACTION MULTIPLE+13~, MULTIPLE+15*, MULTIPLE+31, MULTIPLE+41, MULTIPLE+42
ARR CA7LIST+9~, SORT+3, LISTCA+12~, LISTCA+23, MULTIPLE+13~, GETD+9, FLD95+5
ARR( CA7LIST+21*, SORT+4, SORT+5, LISTCA+21*, LISTCA+28, LISTCA+29, GETD+10, GETD+12, GETD+13, FLD95+6
, FLD95+8, FLD95+9
>> ASISTS SORT+6*, SORT+7*, SORT+11
BAD SETD+1~, SETD+5*, SETD+7, SETD+8*, MFILE+3, MFILE+7*, MFILE+9*, MFILE+10
CA7 CA7LIST+9~, CA7LIST+21*, SORT+1~, SORT+2*, SORT+4*, SORT+5, SORT+11
CA7OK INCLUDE+1~, INCLUDE+2*, INCLUDE+4*, INCLUDE+6*, INCLUDE+7
CAIEN CA7LIST+9~, CA7LIST+13*, CA7LIST+17*, CA7LIST+19, CA7LIST+21, SORT+1~, SORT+5*, SORT+6, SORT+8, SORT+9
, SORT+10, SORT+11, LISTCA+12~, LISTCA+16*, LISTCA+17*, LISTCA+21, LISTCA+29*, LISTCA+30, LISTCA+31, LISTCA+32
, LISTCA+33, LISTCA+34, LISTCA+35, LISTCA+36, LISTCA+37, LISTCA+38, LISTCA+42, INCLUDE+4, INCLUDE+6
CALL CA7LIST~, CA7LIST+10, CA7LIST+11
CALLER CA7LIST+9~, CA7LIST+10*, CA7LIST+15, CA7LIST+19, CA7LIST+20, LISTCA+12~, LISTCA+13*, LISTCA+14, LISTCA+19, LISTCA+20
CN SORT+1~, SORT+2*, SORT+11, SORT+12*, LISTCA+12~, LISTCA+27*, LISTCA+41, LISTCA+43, LISTCA+44*, SETD+1~
, SETD+4*, SETD+5*, SETD+6
CNT PDDEF+1~, GETD+1~, GETD+2*, GETD+14, GETD+15, GETD+16*, OSHA300+7~, OSHA300+8*, OSHA300+18, OSHA300+23*
, FLD15+1~, FLD15+2*, FLD15+7, FLD15+8*
CNUM LISTCA+12~, LISTCA+21*, LISTCA+27*, LISTCA+28*, LISTCA+29, LISTCA+42
DA KILLD+1~, KILLD+2*, KILLD+3*, SETD+1~
DA(1 KILLD+2*, SETD+4*
DATA MULTIPLE~, MULTIPLE+15, GETD+1~, GETD+13*, GETD+15, OSHA300~, OSHA300+12
DATA( MULTIPLE+33, MULTIPLE+34, MULTIPLE+35, MULTIPLE+38*, MULTIPLE+39*, SETD+5, SETD+6, OSHA300+17, OSHA300+19
DATE FLD15+1~
DD MFILE+7!, MFILE+9!
DIC SETD+1~, SETD+4*
DIC("DR" SETD+6*, SETD+13*, MFILE+4, MFILE+5, MFILE+6*, MFILE+8*
DIC(0 SETD+4*
DIE SETD+1~
>> DIERR PDDEF+4
DIK KILLD+1~, KILLD+2*
DLAYGO SETD+1~, SETD+4*
DO MFILE+7!, MFILE+9!
DOI SORT+1~, SORT+9*, SORT+11, LISTCA+12~, LISTCA+31*, LISTCA+42
DR SETD+1~, SETD+2!
DUZ CA7LIST+8, CA7LIST+12, CA7LIST+13, CA7LIST+14, CA7LIST+16, SORT+2, SORT+3, SORT+11, SORT+14, LISTCA+11
, LISTCA+15, LISTCA+19, LISTCA+20, LISTCA+24, LISTCA+25, LISTCA+43, LISTCA+45
ESSN CA7LIST+9~, CA7LIST+14*, CA7LIST+15, CA7LIST+20
FEG PDDEF+1~, PDDEF+2*, PDDEF+4, PDDEF+5, PDDEF+6*, PDDEF+8, PDDEF+10, PDDEF+12
FEG1 PDDEF+1~, PDDEF+2*, PDDEF+8*, PDDEF+10*, PDDEF+12*, PDDEF+19
FIELD MULTIPLE+13~, MULTIPLE+14*, MULTIPLE+17, MULTIPLE+20, MULTIPLE+21, MULTIPLE+22, MULTIPLE+31, GETD+3, GETD+5, GETD+7
FILE CA7LIST+9~, CA7LIST+10*, CA7LIST+11, CA7LIST+17, CA7LIST+19, CA7LIST+21, SORT+6, SORT+8, SORT+9, SORT+10
, LISTCA+12~, LISTCA+13*, LISTCA+14, LISTCA+17, LISTCA+21, LISTCA+30, LISTCA+31, LISTCA+32, LISTCA+33, LISTCA+34
, LISTCA+35, LISTCA+36, LISTCA+37, LISTCA+38, INCLUDE+4, INCLUDE+6, MULTIPLE+13~, MULTIPLE+14*, MULTIPLE+17, MULTIPLE+19
, MULTIPLE+20, MULTIPLE+21, MULTIPLE+22, MULTIPLE+31, GETD+5, GETD+7, GETD+8, SETD+4, OSHA300+7~, OSHA300+8*
, OSHA300+20, OSHA300+21, OSHA300+22, FLD95+3
FLDA GETD+1~, GETD+3*, GETD+8, FLD95+3
FLDS GETD+1~
>> GRD LISTCA+33*, LISTCA+42
I SETD+1~, SETD+7*
IEN MULTIPLE+13~, MULTIPLE+14*, MULTIPLE+17, MULTIPLE+25, MULTIPLE+36, MULTIPLE+37, GETD+2, KILLD+2, SETD+4, FLD15+3
IENS GETD+1~, GETD+2*, GETD+8, OSHA300+7~, OSHA300+18*, OSHA300+20, OSHA300+21, OSHA300+22, FLD15+3*, FLD15+4
, FLD15+5, FLD95+3
INJ LISTCA+12~, LISTCA+35*, LISTCA+42
INPUT LISTCA~, LISTCA+13, MULTIPLE~, MULTIPLE+14
INS PDDEF+1~, PDDEF+2*, PDDEF+4, PDDEF+5, PDDEF+14*, PDDEF+16, PDDEF+18
INS1 PDDEF+1~, PDDEF+2*, PDDEF+16*, PDDEF+18*, PDDEF+19
LV1 OSHA300+7~, OSHA300+10*, OSHA300+14, OSHA300+16, OSHA300+18, FLD15+1~, FLD15+3*, FLD15+4, FLD15+5
LV2 OSHA300+7~, OSHA300+10*, OSHA300+14, OSHA300+16, FLD15+1~, FLD15+3*, FLD15+4, FLD15+5
MSG OSHA300+25, OSHA300+26!
NM SORT+1~, SORT+8*, SORT+11, LISTCA+12~, LISTCA+30*, LISTCA+42
NODE KILLD+1~, KILLD+2*
NUM SETD+1~, SETD+6*, SETD+7
OOPSARR FLD95+1~
OOPSARR( FLD95+9*, FLD95+12, FLD95+14, FLD95+15
OOPSCNT MULTIPLE+13~, MULTIPLE+32*, MULTIPLE+33*, MULTIPLE+34, MULTIPLE+35, MULTIPLE+36, MULTIPLE+37, MULTIPLE+38, MULTIPLE+39, FLD95+1~
, FLD95+2*, FLD95+16, FLD95+17, FLD95+18*
OOPSDATA FLD95+1~, FLD95+15*, FLD95+17
OOPSFLD FLD95+1~, FLD95+7*, FLD95+8*, FLD95+9, FLD95+13*, FLD95+14*, FLD95+15
OOPSIEN FLD95+1~, FLD95+7*
OOPSSREC FLD95+1~, FLD95+7*, FLD95+9, FLD95+11*, FLD95+12*, FLD95+14, FLD95+15
OOPSSUB FLD95+1~, FLD95+5*, FLD95+6*, FLD95+7, FLD95+8, FLD95+9
OOPSSV MULTIPLE+13~, MULTIPLE+34*, MULTIPLE+36*, MULTIPLE+38
OOPSSV1 MULTIPLE+13~, MULTIPLE+35*, MULTIPLE+37*, MULTIPLE+39
OSHAFDA OSHA300+7~
OSHAFDA( OSHA300+20*, OSHA300+21*, OSHA300+22*
PAID PDDEF+1~, PDDEF+6*, PDDEF+12, PDDEF+14
PAR LISTCA+12~, LISTCA+13*, LISTCA+14, LISTCA+17, LISTCA+19, LISTCA+20, OSHA300+7~, OSHA300+9*, OSHA300+10, FLD15+1~
, FLD15+2*, FLD15+3
>> PAY LISTCA+37*, LISTCA+42
PCE MFILE+1~, MFILE+5*, MFILE+8
PCE1 MFILE+1~, MFILE+5*, MFILE+6, MFILE+8
PDFLD LISTCA+12~, LISTCA+41*, LISTCA+43
>> PER LISTCA+38*, LISTCA+42
PERSON CA7LIST~, CA7LIST+11, CA7LIST+15, CA7LIST+17, CA7LIST+20
REC OSHA300+7~, OSHA300+17*, OSHA300+19, FLD15+1~, FLD15+3*, FLD15+4*, FLD15+5
RESULTS CA7LIST~, SORT+14*, LISTCA~, LISTCA+25*, LISTCA+45*, MULTIPLE~, OSHA300~, OSHA300+11*, OSHA300+12*, OSHA300+13*
, OSHA300+15*, OSHA300+25*
RESULTS( GETD+14*, GETD+15*, FLD15+7*, FLD95+16*, FLD95+17*
RESULTS(0 MULTIPLE+16*, MULTIPLE+18*, GETD+9*, SETD+3*, MFILE+2*, MFILE+3*, MFILE+10*, FLD95+5*
RESULTS(1 MULTIPLE+23*
>> RET LISTCA+36*, LISTCA+43
ROOT MULTIPLE+13~, MULTIPLE+19*, MULTIPLE+25, KILLD+3
SAVEDIK MULTIPLE+13~, MULTIPLE+25*, KILLD+2, SETD+4
SFLD GETD+1~, GETD+11*, GETD+12*, GETD+13
SIEN GETD+1~, GETD+9*, GETD+10*, GETD+11, GETD+12, GETD+13
SPEC MULTIPLE+13~, MULTIPLE+20*, MULTIPLE+22, GETD+10, GETD+12, GETD+13, SETD+10, FLD95+6, FLD95+8, FLD95+9
SREC GETD+1~, GETD+11*
SSN SORT+1~, SORT+10*, SORT+11, LISTCA+12~, LISTCA+32*, LISTCA+42, PDDEF+3
STA OSHA300~, OSHA300+13, OSHA300+14, OSHA300+16, OSHA300+18
>> STP LISTCA+34*, LISTCA+42
STR LISTCA+42*, LISTCA+43, SETD+1~, SETD+6*, SETD+7, OSHA300+7~, OSHA300+19*, OSHA300+20, OSHA300+21, OSHA300+22
, OSHA300+26!, FLD15+5*, FLD15+6, FLD15+7
>> STR1 SETD+7*, SETD+8, SETD+9, SETD+11, SETD+12, SETD+13
SUB MULTIPLE+13~, MULTIPLE+21*, MULTIPLE+25, KILLD+2
TMP MFILE+1~, MFILE+5*, MFILE+6, MFILE+8
TYPE GETD+1~, SETD+1~, SETD+10*, SETD+11
U CA7LIST+10, CA7LIST+19, SORT+11, LISTCA+13, LISTCA+42, LISTCA+43, PDDEF+4, PDDEF+5, PDDEF+6, PDDEF+12
, PDDEF+14, PDDEF+19, MULTIPLE+14, GETD+13, SETD+6, SETD+7, OSHA300+20, OSHA300+21, OSHA300+22, FLD15+6
, FLD15+7, FLD95+15
X SETD+5*, SETD+11*, SETD+12*, MFILE+2, OSHA300+26!
Y MFILE+7, MFILE+9, OSHA300+26!, FLD15+6*, FLD15+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All