Routine: OOPSPUT1

Caller Graph

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Package	Total	Caller Graph
Asists	4	OOPSPC11 OOPSPC21 OOPSPC41 OOPSPC51

Name	Comments	DBIA/ICR reference
WDATE(OOPSDT,OOPSLC1,OOPSLC2,OOPSLC3)	;PRINT MONTH,DAY,YEAR
WTIME(OOPSTM,OOPSAM,OOPSPM,OOPSLC1,OOPSLC2)	;PRINT TIME
WPHONE(OOPSPHON,OOPSLC1,OOPSLC2)	;PRINT HOME PHONE
WKSCHDUL(SCHEDL,SUN,MON,TUE,WED,THU,FRI,SAT)	;PRINT WORK SCHEDULE

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"PU"_OOPSLC1_";LB"_$E(OOPSDT,4,5)_DL_";PU"_OOPSLC2_";LB"_$E(OOPSDT,6,7)_DL_";PU"_OOPSLC3_";LB"_$E(OOPSDT,2,3)_DL_";" Line Location: WDATE+6
Function Call: WRITE	Prompt: !,"PU"_OOPSPM_";LBX"_DL_";" Line Location: WTIME+10
Function Call: WRITE	Prompt: !,"PU"_OOPSAM_";LBX"_DL_";" Line Location: WTIME+11
Function Call: WRITE	Prompt: !,"PU"_OOPSLC1_";LB"_OOPSHR_DL_";PU"_OOPSLC2_";LB"_$E(OOPSTM,3,4)_DL_";" Line Location: WTIME+12
Function Call: WRITE	Prompt: !,"PU"_OOPSLC1_";LB"_$P(OOPSPHON,"-")_DL_";PU"_OOPSLC2_";LB"_$P(OOPSPHON,"-",2,9)_DL_";" Line Location: WPHONE+5
Function Call: WRITE	Prompt: !,"PU"_OOPSLC1_";LB"_$E(OOPSPHON,1,3)_DL_";PU"_OOPSLC2_";LB"_$E(OOPSPHON,4,18)_DL_";" Line Location: WPHONE+6
Function Call: WRITE	Prompt: !,$S(II=1:"PU"_SUN_";LBX"_DL_";",II=2:"PU"_MON_";LBX"_DL_";",II=3:"PU"_TUE_";LBX"_DL_";",II=4:"PU"_WED_";LBX"_DL_";",II=5:"PU"_THU_";LBX"_DL_";",II=6:"PU"_FRI_";LBX"_DL_";",II=7:"PU"_SAT_";LBX"_DL_";",1:"") Line Location: WKSCHDUL+12

Name	Field # of Occurrence
AMPM	WTIME+7~, WTIME+8*, WTIME+10, WTIME+11
DL	WDATE+5~, WDATE+6, WTIME+6~, WTIME+10, WTIME+11, WTIME+12, WPHONE+4~, WPHONE+5, WPHONE+6, WKSCHDUL+3~ , WKSCHDUL+12
>> FORM	WDATE+5, WTIME+6, WPHONE+4, WKSCHDUL+3
FRI	WKSCHDUL~, WKSCHDUL+12
II	WKSCHDUL+4~, WKSCHDUL+5, WKSCHDUL+6, WKSCHDUL+7, WKSCHDUL+11*, WKSCHDUL+12
JJ	WKSCHDUL+4~, WKSCHDUL+7*, WKSCHDUL+8, WKSCHDUL+9, WKSCHDUL+10
KK	WKSCHDUL+4~, WKSCHDUL+9*
MON	WKSCHDUL~, WKSCHDUL+12
OOPSAM	WTIME~, WTIME+11
OOPSDT	WDATE~, WDATE+5, WDATE+6
OOPSHR	WTIME+7~, WTIME+8, WTIME+9, WTIME+12
OOPSLC1	WDATE~, WDATE+6, WTIME~, WTIME+12, WPHONE~, WPHONE+5, WPHONE+6
OOPSLC2	WDATE~, WDATE+6, WTIME~, WTIME+12, WPHONE~, WPHONE+5, WPHONE+6
OOPSLC3	WDATE~, WDATE+6
OOPSPHON	WPHONE~, WPHONE+4, WPHONE+5, WPHONE+6
OOPSPM	WTIME~, WTIME+10
OOPSTM	WTIME~, WTIME+6, WTIME+7, WTIME+12
SAT	WKSCHDUL~, WKSCHDUL+12
SCHEDL	WKSCHDUL~, WKSCHDUL+3, WKSCHDUL+5, WKSCHDUL+6, WKSCHDUL+7
SUN	WKSCHDUL~, WKSCHDUL+12
THU	WKSCHDUL~, WKSCHDUL+12
TUE	WKSCHDUL~, WKSCHDUL+12
WED	WKSCHDUL~, WKSCHDUL+12
WKDAY	WKSCHDUL+4~
WKDAY(	WKSCHDUL+5, WKSCHDUL+9, WKSCHDUL+10*, WKSCHDUL+11