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

Package: Asists

Routine: OOPSGUI8


Information

OOPSGUI8 ;WIOFO/LLH-RPC Broker calls for GUI ;10/23/01

Source Information

Source file <OOPSGUI8.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 5 ^%DT  FILE^DICN  UPDATE^DIE  IX^DIK  $$GET1^DIQ  
Asists 4 VALIDATE^OOPSGUI9  CLRES^OOPSGUIS  (CLRES,WK)^OOPSUTL1  EMP^OOPSVAL1  
Kernel 2 POSTAL^XIPUTIL  $$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: 7

Package Total Caller Graph
Asists 7 OOPS APPROVE SIGN FOR EMPLOYEE  OOPS CLEAR SIGNATURE  OOPS CREATE AMENDMENT  OOPS GET NOI CODE  OOPS REPLACE DATE/TIME  OOPS SET DETAIL LOCATION  OOPS ZIP CODE MISMATCH CHECK  

Entry Points

Name Comments DBIA/ICR reference
DTFC(RESULTS,DATE,FLAG) ; Reformat Date/Time
; Input - Date to be reformatted
; - Flag to be used
; Output - RESULTS contains the reformatted date
WCPS4E ; allow WCP to sign for employee if all approvals given
ZIPCHK(RESULTS,DATA) ; patch 5 - validate zip code against file 5.12
; to ensure zip in file and has correct state.
CSIGN(RESULTS,IEN,FORM,CALL) ; Clears Signature from form
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
DONE
EN1(RESULTS,INPUT) ; Entry point for routine
; Input: INPUT contains the IEN of the ASISTS record and the
; calling menu, in the format IEN^CALLING MENU
; Output: RESULTS contains status messages back to the client.
; RESULTS(0) will = either 1 or 0. 1 if ok for form to be
; signed by calling menu option, 0 if not ok. The RESULTS
; array with status message will start at 1.
EXIT ;
SETDLOC(RESULTS,P1,DATA) ; files the detail location records
; Input - P1 is the Location record IEN concatenated with the station
; subrecord IEN. EX. 38^600
; DATA is a # subscripted array containing the detail loc data
; in the format - detail location description^Detail Loc IEN
; Output - RESULTS indicating the success of the filing.
AMEND(RESULTS,OLDIEN) ; File new Amended Case
; Input: OLDIEN - The ASISTS IEN for the case to have an
; amendment created for.
; Output: RESULTS - Single value with the new case number
GETNOI(RESULTS,OPT) ; Broker Call to retrieve NOI Codes
; Input: OPT - Either CA1 or CA2 to indicate which codes should be
; retrieved. If CA1 must start with T, otherwise CA2
; Output: RESULTS - NOI Description and Code

External References

Name Field # of Occurrence
^%DT DTFC+8, DTFC+10
FILE^DICN AMEND+12
UPDATE^DIE SETDLOC+13, SETDLOC+29
IX^DIK AMEND+18
$$GET1^DIQ EN1+11, WCPS4E+18
VALIDATE^OOPSGUI9 WCPS4E+26
CLRES^OOPSGUIS CSIGN+13
CLRES^OOPSUTL1 WCPS4E+18, CSIGN+12
WK^OOPSUTL1 AMEND+24
EMP^OOPSVAL1 WCPS4E+31
POSTAL^XIPUTIL ZIPCHK+10
$$FMTE^XLFDT DTFC+13

Used in RPC

RPC Name Call Tags
OOPS REPLACE DATE/TIME DTFC
OOPS CREATE AMENDMENT AMEND
OOPS APPROVE SIGN FOR EMPLOYEE EN1
OOPS CLEAR SIGNATURE CSIGN
OOPS GET NOI CODE GETNOI
OOPS ZIP CODE MISMATCH CHECK ZIPCHK
OOPS SET DETAIL LOCATION SETDLOC

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( SETDLOC+11, SETDLOC+17, SETDLOC+19, SETDLOC+20!, SETDLOC+21!
^OOPS(2260 - [#2260] VALID+5, VALID+6, AMEND+6, AMEND+7, AMEND+8*, AMEND+14*, AMEND+15, AMEND+17*, AMEND+19!, AMEND+20!
, AMEND+21!, AMEND+23, AMEND+25!
^OOPS(2263.3 - [#2263.3] GETNOI+6, GETNOI+7

Label References

Name Line Occurrences
$$VALID EN1+20
DONE AMEND+12
EXIT EN1+22
WCPS4E EN1+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DTFC+5~, DTFC+8*, SETDLOC+31!
>> BAD SETDLOC+7*, SETDLOC+11, SETDLOC+15*
CALL EN1+8~, EN1+10*, EN1+13, EN1+16, EN1+19, WCPS4E+30, VALID+8, VALID+12, VALID+23, CSIGN~
, CSIGN+10, CSIGN+12, CSIGN+13
CALLER WCPS4E+30~*
CN EN1+8~, EN1+9*, EN1+21*, WCPS4E+28*, VALID+17, VALID+18, VALID+19, VALID+20*, VALID+22, VALID+23*
, VALID+24, VALID+25*, VALID+27, VALID+28*, GETNOI+4~, GETNOI+5*, GETNOI+8, GETNOI+9, GETNOI+10*
CNT SETDLOC+6~, SETDLOC+23*, SETDLOC+25*, SETDLOC+26
CODE GETNOI+4~, GETNOI+7*, GETNOI+8, GETNOI+9
CONT WCPS4E+1~, VALID+2~, VALID+7*, VALID+9, VALID+11, VALID+13, VALID+15
DA AMEND+18*, DONE!
DATA ZIPCHK~, ZIPCHK+7, SETDLOC~, SETDLOC+8
DATA( SETDLOC+24, SETDLOC+25
DATE DTFC~, DTFC+7, DTFC+8, DTFC+9*, DTFC+11*, DTFC+12, DTFC+13
DD AMEND+10!
DES GETNOI+4~, GETNOI+5*, GETNOI+6*, GETNOI+8, GETNOI+9
DIC EN1+8~, AMEND+11*, DONE!
DIC(0 AMEND+11*
>> DIENS SETDLOC+17*, SETDLOC+18, SETDLOC+19, SETDLOC+20, SETDLOC+21, SETDLOC+27
DIK AMEND+18*, DONE!
DLAYGO AMEND+5~, AMEND+11*
DO AMEND+10!
DUZ VALID+7, VALID+10, VALID+14
EHAPP VALID+2~, VALID+6*, VALID+7, VALID+10, VALID+15
EHS WCPS4E+1~
ERR VALID+2~, VALID+3*, VALID+9*, VALID+10*, VALID+11*, VALID+13*, VALID+14*, VALID+15*, VALID+16, VALID+21
, VALID+26
FILE SETDLOC+6~, SETDLOC+7*, SETDLOC+11, SETDLOC+17, SETDLOC+19, SETDLOC+20, SETDLOC+21
FLAG DTFC~, DTFC+6*, DTFC+7, DTFC+11
FORM EN1+8~, EN1+11*, EN1+12*, EN1+16, WCPS4E+18, WCPS4E+26, CSIGN~, CSIGN+10, CSIGN+12, CSIGN+13
IEN EN1+8~, EN1+10*, EN1+11, EN1+16, WCPS4E+18, WCPS4E+26, VALID+5, VALID+6, CSIGN~, CSIGN+10
, CSIGN+12, CSIGN+13, AMEND+22~, AMEND+24*
IENS SETDLOC+6~, SETDLOC+12*, SETDLOC+27*, SETDLOC+28
INPUT EN1~, EN1+10
LOC SETDLOC+6~, SETDLOC+7*, SETDLOC+10, SETDLOC+11, SETDLOC+12, SETDLOC+17, SETDLOC+19, SETDLOC+20, SETDLOC+21, SETDLOC+27
LV1 SETDLOC+6~, SETDLOC+17*, SETDLOC+19, SETDLOC+20
LV2 SETDLOC+6~, SETDLOC+19*, SETDLOC+20
MSG SETDLOC+6~, SETDLOC+30, SETDLOC+31!
MSG("DIERR" SETDLOC+14
NEWIEN AMEND+13*, AMEND+14, AMEND+15, AMEND+17, AMEND+18, AMEND+19, AMEND+20, AMEND+21, AMEND+23, AMEND+25
, DONE!
NOI GETNOI+4~, GETNOI+6*, GETNOI+7, GETNOI+8, GETNOI+9
NUM AMEND+7*, AMEND+9*, AMEND+11, AMEND+16, AMEND+26, DONE!
OLDIEN AMEND~, AMEND+6, AMEND+7, AMEND+8, AMEND+14, AMEND+24, DONE!
OOP AMEND+15*, AMEND+16*, AMEND+17, DONE!
OPT GETNOI~, GETNOI+8, GETNOI+9
P1 SETDLOC~, SETDLOC+7
PRM1 EN1+8~, EN1+13*, EN1+14, VALID+18, VALID+27
PRM2 EN1+8~, EN1+14*, EN1+21
REC SETDLOC+6~, SETDLOC+23*, SETDLOC+24*, SETDLOC+25
RECNO SETDLOC+6~, SETDLOC+23*, SETDLOC+25*, SETDLOC+26*, SETDLOC+27
RESULTS EN1~, CSIGN~, CSIGN+9*, CSIGN+10*, CSIGN+14*, DTFC~, DTFC+7*, DTFC+12*, DTFC+13*, GETNOI~
, ZIPCHK~, ZIPCHK+8*, ZIPCHK+9*, ZIPCHK+11*, ZIPCHK+12*, ZIPCHK+13*, AMEND~, AMEND+26*, SETDLOC~, SETDLOC+7*
, SETDLOC+8*, SETDLOC+9*, SETDLOC+10*, SETDLOC+15*, SETDLOC+30*
RESULTS( EN1+21*, WCPS4E+28*, VALID+17*, VALID+18*, VALID+19*, VALID+22*, VALID+23*, VALID+24*, VALID+27*, GETNOI+8*
, GETNOI+9*
RESULTS(0 EN1+17*, EN1+20*, EN1+21, WCPS4E+25*, WCPS4E+29*
RESULTS(1 EN1+18*, DTFC+7*, DTFC+12*, DTFC+13*
SIGN EN1+8~, EN1+15*, WCPS4E+1~, WCPS4E+2*
SOAPP VALID+2~, VALID+5*, VALID+7, VALID+11, VALID+14
SOS WCPS4E+1~
>> STA SETDLOC+7*, SETDLOC+9, SETDLOC+11, SETDLOC+12, SETDLOC+17
STAFDA SETDLOC+6~, SETDLOC+23!
STAFDA( SETDLOC+12*, SETDLOC+28*
STATE ZIPCHK+6~, ZIPCHK+7*, ZIPCHK+9, ZIPCHK+12
STR SETDLOC+6~, SETDLOC+25*, SETDLOC+28, SETDLOC+31!
SUF AMEND+7*, AMEND+9, DONE!
U EN1+10, VALID+5, VALID+6, GETNOI+7, ZIPCHK+7, AMEND+7, AMEND+8, AMEND+16, AMEND+17, AMEND+23
, SETDLOC+7, SETDLOC+25, SETDLOC+28
VALID WCPS4E+1~, WCPS4E+2*, WCPS4E+26, WCPS4E+28, WCPS4E+29, VALID+2~, VALID+3*, VALID+20*, VALID+25*, VALID+28*
, VALID+29
VALSTATE ZIPCHK+6~
VALZIP ZIPCHK+6~
VIEW WCPS4E+1~, WCPS4E+2*, WCPS4E+16
WCPDUZ AMEND+22~, AMEND+23*, AMEND+24
WOK AMEND+22~, AMEND+24*
X DTFC+5~, DTFC+8*, DTFC+9*, AMEND+11*, AMEND+22~, AMEND+24*, DONE!, SETDLOC+31!
Y EN1+8~, DTFC+9, DTFC+11, AMEND+12, AMEND+13, DONE!, SETDLOC+31!
ZIP ZIPCHK+6~, ZIPCHK+7*, ZIPCHK+9, ZIPCHK+10
ZZIP ZIPCHK+6~, ZIPCHK+10
ZZIP("ERROR" ZIPCHK+11
ZZIP("STATE" ZIPCHK+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All