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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: OOPSWCSE

Package: Asists

Routine: OOPSWCSE


Information

OOPSWCSE ;WIOFO/LLH-Workers' Comp Sign for Employee ;01/20/01

Source Information

Source file <OOPSWCSE.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Asists 6 ^OOPSDIS  $$SIG^OOPSESIG  ($$EDSTA,CLRES)^OOPSUTL1  ($$ISEMP,VALIDATE)^OOPSUTL4  EMP^OOPSVAL1  $$VALID^OOPSWCSE  
VA FileMan 3 ^DIC  $$GET1^DIQ  ^DIR  

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: 3

Package Total Caller Graph
Asists 3 OOPSEMP1  OOPSGUI0  OOPSWCSE  

Entry Points

Name Comments DBIA/ICR reference
VALID() ; make sure same person is not signing for both safety and EH and if
; signed from menu option being called not needed again - so quit
SCR(IEN) ; Screen to allow access to claims that have not been
; signed by the Employee
; Input: IEN = Internal record number of claim
WCPS4E ; allow WCP to sign for employee if all approvals given
EN1(CALLER) ; Entry point for routine
; Input: CALLER = "S" for Safety Officer
; "H" for Employee Health
; "W" for Workers' Comp
EXIT ;

External References

Name Field # of Occurrence
^DIC EN1+12
$$GET1^DIQ EN1+15, WCPS4E+3, WCPS4E+4, WCPS4E+15, SCR+5, SCR+12
^DIR VALID+20
^OOPSDIS EN1+18
$$SIG^OOPSESIG EN1+25, WCPS4E+18
$$EDSTA^OOPSUTL1 SCR+7, SCR+15
CLRES^OOPSUTL1 WCPS4E+15
$$ISEMP^OOPSUTL4 SCR+6
VALIDATE^OOPSUTL4 WCPS4E+16
EMP^OOPSVAL1 WCPS4E+20
$$VALID^OOPSWCSE EN1+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,PRM2
  • Line Location: EN1+24
Function Call: WRITE
  • Prompt: !,"You have approved as "_$S(CONT="S":"Safety Officer",CONT="H":"Emp Health Rep",1:"")
  • Line Location: WCPS4E+7
Function Call: WRITE
  • Prompt: " and cannot sign as Employee."
  • Line Location: WCPS4E+8
Function Call: WRITE
  • Prompt: !,"Three different individuals must be involved."
  • Line Location: WCPS4E+9
Function Call: WRITE
  • Prompt: !,"Safety Officer has not approved WCP signing for employee."
  • Line Location: WCPS4E+11
Function Call: WRITE
  • Prompt: !,"Employee Health has not approved WCP signing for employee."
  • Line Location: WCPS4E+12
Function Call: WRITE
  • Prompt: !
  • Line Location: WCPS4E+16
Function Call: WRITE
  • Prompt: !,"You have signed as "_PRM1_" if you continue, your ES will be removed"
  • Line Location: VALID+16
Function Call: WRITE
  • Prompt: !
  • Line Location: VALID+18
Function Call: WRITE
  • Prompt: !,"You have already signed as "
  • Line Location: VALID+26
Function Call: WRITE
  • Prompt: $S(CALLER="S":"Employee Health",CALLER="H":"Safety Officer",1:0)
  • Line Location: VALID+27
Function Call: WRITE
  • Prompt: ".",!,"Both signatures cannot be made by the same person."
  • Line Location: VALID+28
Function Call: WRITE
  • Prompt: !,PRM1_" has already signed, re-signing is not required."
  • Line Location: VALID+31
Routine Call
  • DIC
  • Line Location:
    • EN1+12
Routine Call
  • DIR
  • Line Location:
    • VALID+20

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OOPS(2260 - [#2260] EN1+27*, EN1+28*, VALID+4, VALID+5, VALID+23*
^VA(200 - [#200] EN1+7

Label References

Name Line Occurrences
EXIT EN1+29
WCPS4E EN1+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CALLER EN1~, EN1+19, EN1+22, EN1+27, EN1+28, VALID+7, VALID+11, VALID+22, VALID+27, SCR+8
, SCR+9
CONT WCPS4E+1~, WCPS4E+5*, WCPS4E+6, WCPS4E+7, VALID+2~, VALID+6*, VALID+8, VALID+10, VALID+12, VALID+14
DIC EN1+5~, EN1+9*
DIC("A" EN1+11*
DIC("S" EN1+10*
DIC(0 EN1+11*
DIR VALID+17~
DIR("A" VALID+19*
DIR(0 VALID+19*
DTOUT EN1+13, EXIT+1!
DUOUT EN1+13, EXIT+1!
DUZ EN1+6, EN1+7, EN1+25, WCPS4E+5, WCPS4E+18, VALID+6, VALID+9, VALID+13, SCR+14
EES SCR+3~, SCR+12*, SCR+13, SCR+14
EHAPP VALID+2~, VALID+5*, VALID+6, VALID+9, VALID+14
EHS WCPS4E+1~, WCPS4E+4*, WCPS4E+5, WCPS4E+12
ERR VALID+2~, VALID+3*, VALID+8*, VALID+9*, VALID+10*, VALID+12*, VALID+13*, VALID+14*, VALID+15, VALID+25
, VALID+30
ESTAT SCR+3~, SCR+7*, SCR+8
FLD VALID+17~, VALID+22*, VALID+23, SCR+3~, SCR+10*, SCR+11, SCR+12
FORM EN1+5~, EN1+15*, EN1+16*, EN1+17, WCPS4E+15, WCPS4E+16, SCR+3~, SCR+5*, SCR+8, SCR+10
, SCR+15
>> I VALID+23*
IEN EN1+5~, EN1+8*, EN1+14*, EN1+15, EN1+25, EN1+27, EN1+28, WCPS4E+3, WCPS4E+4, WCPS4E+15
, WCPS4E+16, WCPS4E+18, VALID+4, VALID+5, VALID+23, SCR~, SCR+5, SCR+6, SCR+7, SCR+12
, SCR+15
PRM1 EN1+5~, EN1+19*, EN1+20, VALID+16, VALID+31
PRM2 EN1+5~, EN1+20*, EN1+24
SIGN EN1+5~, EN1+21*, EN1+25*, EN1+26, EN1+27, EN1+28, WCPS4E+1~, WCPS4E+2*, WCPS4E+18*, WCPS4E+19
SOAPP VALID+2~, VALID+4*, VALID+6, VALID+10, VALID+13
SOS WCPS4E+1~, WCPS4E+3*, WCPS4E+5, WCPS4E+11
SUP EXIT+1!
U EN1+14, EN1+27, EN1+28, VALID+4, VALID+5, VALID+23, SCR+8, SCR+15
VALID EN1+5~, WCPS4E+1~, WCPS4E+2*, WCPS4E+16, WCPS4E+17, VALID+2~, VALID+3*, VALID+24*, VALID+29*, VALID+32*
, VALID+33
VIEW WCPS4E+1~, WCPS4E+2*, WCPS4E+10*, WCPS4E+11*, WCPS4E+12*, WCPS4E+13, SCR+3~, SCR+4*, SCR+6*, SCR+8*
, SCR+11*, SCR+14*, SCR+15*, SCR+16
Y EN1+5~, EN1+13, EN1+14, VALID+17~, VALID+21, VALID+24
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All