Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: OOPSWCE

Package: Asists

Routine: OOPSWCE


Information

OOPSWCE ;WIOFO/LLH-Workers Comp Edit routine ;3/23/00

Source Information

Source file <OOPSWCE.m>

Entry Points

Name Comments DBIA/ICR reference
EN1(CALLER) ; Main Entry Point
EXIT ; Validate and allow user to sign if all required fields complete
FORMS ; Process Form
WC(IEN) ; Selection Screen
; Input - IEN Internal entry number of case
; Output - VIEW If 0 case not accessible, if 1 case selectable
WCEDIT ; check for edits by WC
; Get data from fields 146, 147, 148, 149, 163, 164, 165.
WCSIGN ; Prompt user to continue as Supervisor if Super has not signed form
SUPSIGN ; Sign/validate Document
SIGNS(FORM) ;
CLRFLDS ; Clear Supervisor Signature fields
SUPFLDS ; Get Supervisor signature related data for CA1 only
CHGES(DONE) ; Verify changes have been made to controlled fields
; Can quit as soon as any change is discovered
; Input - none
; Output - DONE if 1, at least 1 field edited, else no edits (0)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"Another user is editing this entry. Try later."
  • Line Location: FORMS+29
Function Call: WRITE
  • Prompt: !!,"Supervisor has not signed "_FORM
  • Line Location: SIGNS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SIGNS+20
Function Call: WRITE
  • Prompt: !!,"Worker's Comp edit of special fields occurred, Supervisor"
  • Line Location: CLRFLDS+5
Function Call: WRITE
  • Prompt: !,"signature fields cleared, you will need to sign as Supervisor."
  • Line Location: CLRFLDS+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^OOPS(2260 - [#2260] Classic Fileman Calls,  GET1^DIQ
2262.03 FIND1^DIC,  GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call