Routine: OOPSEMP1

Package	Total	Call Graph
Asists	8	^OOPSEMP2 ^OOPSEMPB $$SIG^OOPSESIG WCPBOR^OOPSMBUL ($$EDSTA,$$PAID,$$PAYP,CLRES)^OOPSUTL1 VALIDATE^OOPSUTL4 EMP^OOPSVAL1 WCPS4E^OOPSWCSE
VA FileMan	3	^DIC ^DIE $$GET1^DIQ
Kernel	1	^XUSESIG

Package	Total	Caller Graph
Asists	1	OOPSVAL1

Entry Points

Name	Comments	DBIA/ICR reference
EN1(CALLER)	; Main Entry Point
FORM
EXIT	; quit the routine
SAFE(IEN)	; Safety Officer Screen
SUP(DUZ,IEN)	; Supervisor Screen
SIGN(FORM)	; Sign/validate Document
BOR	; patch 10 - does employee understand Bill of Rights

Name	Field # of Occurrence
^DIC	EN1+27
^DIE	FORM+25, BOR+5
$$GET1^DIQ	FORM, FORM+8, FORM+11, FORM+17, FORM+18, FORM+30, SAFE+3, SAFE+5, SAFE+8, SUP+3 , SUP+6, SUP+8, SUP+9, SIGN+3, SIGN+7
^OOPSEMP2	FORM+23
^OOPSEMPB	FORM+22
$$SIG^OOPSESIG	SIGN+10
WCPBOR^OOPSMBUL	FORM+18
$$EDSTA^OOPSUTL1	SAFE+6, SAFE+7, SUP+4, SUP+5
$$PAID^OOPSUTL1	FORM+8, FORM+13
$$PAYP^OOPSUTL1	FORM+13
CLRES^OOPSUTL1	FORM+5
VALIDATE^OOPSUTL4	SIGN+4
EMP^OOPSVAL1	FORM+34
WCPS4E^OOPSWCSE	FORM+37
^XUSESIG	SIGN+9

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No SSN on file for this Employee" Line Location: EN1+13
Function Call: WRITE	Prompt: !?5,"Claim cannot be signed until the Bill of Rights Statement is understood." Line Location: FORM+31
Function Call: WRITE	Prompt: !!,"Checking for Safety and Emp Health Ok to sign for Employee." Line Location: FORM+36
Function Call: WRITE	Prompt: ! Line Location: SIGN+4
Function Call: WRITE	Prompt: !!,"Please enter a Signature Code.",! Line Location: SIGN+8
Function Call: WRITE	Prompt: ! Line Location: BOR+3
Routine Call	DIC Line Location: EN1+27
Routine Call	DIE Line Location: FORM+25 BOR+5

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^OOPS(2260 - [#2260]	Classic Fileman Calls, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^OOPS(2260 - [#2260]	EN1+11, EN1+14
^VA(200 - [#200]	EN1+10, EN1+12

Name	Field # of Occurrence
CALLER	EN1~, EN1+11, EN1+19, EN1+20, EN1+21, EN1+23, FORM+5, FORM+16, FORM+27, FORM+35 , SIGN+6
CAT	EN1+7~, FORM+10, FORM+11, FORM+12, FORM+13, FORM+14
CIT	EXIT+1!
DA	FORM+24, BOR+1~, BOR+2
DIC	EN1+17~, EN1+18*
DIC("A"	EN1+26*
DIC("S"	EN1+19, EN1+20, EN1+21, EN1+23, EN1+25*
DIC(0	EN1+26*
DIE	FORM+20~, FORM+24, BOR+1~, BOR+2
DR	FORM+20~, BOR+1~, BOR+2*
DR(1	BOR+4*
>> DTOUT	EN1+29
>> DUOUT	EN1+29
DUZ	EN1+9, EN1+10, EN1+12, SUP~, SUP+9, SIGN+7, SIGN+10
EMP	SIGN+1~
FLD	EN1+7~, FORM+7*, FORM+8
FORM	FORM, FORM+1, FORM+2, FORM+5, FORM+22, FORM+23, FORM+32, SAFE+1~, SAFE+3, SUP+1~ , SUP+3, SIGN~, SIGN+4
FORMS	SUP+1~, SUP+3*, SUP+4, SUP+5
HSA	EXIT+1!
IEN	EN1+7~, EN1+8, EN1+16, EN1+30, FORM, FORM+5, FORM+8, FORM+11, FORM+13, FORM+17 , FORM+18, FORM+24, FORM+30, SAFE~, SAFE+3, SAFE+5, SAFE+6, SAFE+7, SAFE+8, SUP~ , SUP+3, SUP+4, SUP+5, SUP+6, SUP+8, SUP+9, SIGN+3, SIGN+4, SIGN+10, BOR+2
INC	SIGN+1~, SIGN+3*
INT	EN1+17~
MAX	EXIT+1!
MAX1	EN1+8*, EXIT+1!
ODESC	EN1+7~, FORM+7, FORM+8
OOPS	FORM+20~
OUT	EN1+7~, FORM+16, FORM+19, BOR+5
PAYP	EN1+7~, FORM+10, FORM+13, FORM+14*
SIGN	FORM+28~, FORM+33, FORM+34, SUP+1~, SIGN+2, SIGN+10
SIGN2	FORM+20~
SSN	EN1+7~, EN1+11, EN1+12*, EN1+13, EN1+14
STA	EXIT+1!
TYPE	SAFE+1~, SAFE+3*, SAFE+6, SAFE+7
U	EN1+12, EN1+30, FORM+34, SAFE+6, SAFE+7, SUP+4, SUP+5
VALID	SIGN+1~, SIGN+2*, SIGN+4, SIGN+5
VIEW	SAFE+1~, SAFE+2, SAFE+5, SAFE+6, SAFE+7, SAFE+8, SAFE+9, SUP+1~, SUP+2, SUP+4* , SUP+5, SUP+6, SUP+8, SUP+9, SUP+10
X	EN1+17~
>> Y	EN1+28, EN1+30, FORM+26, BOR+5
ZIP	EXIT+1!