Routine: GECSUFM1

Package	Total	Call Graph
VA FileMan	3	DD^%DT NOW^%DTC ^DIE
Generic Code Sheet	1	(SETCS,SETSTAT)^GECSSTAA

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 18

Package	Total	Caller Graph
IFCAP	10	PRCB8A PRCB8A1 PRCB8A2 PRCB8B PRCFDA2 PRCFFERT PRCFFUB PRCH8A PRCPSFIV PRCPSFSV
Accounts Receivable	6	RCXFMSCR RCXFMSSV RCXFMST1 RCXFMSTX RCXFMSW1 RCXFMSWR
Generic Code Sheet	2	GECSSTTR GECSUFMS

Entry Points

Name	Comments	DBIA/ICR reference
REBUILD(STACKDA,SYSTEM,SECCODE,FCPFLAG,DESCRIPT)		ICR #1114 Status: Active Usage: Controlled Subscription
UPDSTACK(STACKDA,CONTROL,BATCH,DOCUMENT,DESCRIPT)	; kill existing stack ; entry code sheets and add new ones ; stackda = ien of stack entry ; control = control segment ; batch = batch segment (optional, use "" if not defined) ; document = doc and <tc>1 segments (optional, use "" if not defined) ; descript = 79 character description of event
FORMTIME(TIME)	; return formatted time for control ctl segment

Name

Comments

DBIA/ICR reference

REBUILD(STACKDA,SYSTEM,SECCODE,FCPFLAG,DESCRIPT)

ICR #1114

Status: Active

Usage: Controlled Subscription

UPDSTACK(STACKDA,CONTROL,BATCH,DOCUMENT,DESCRIPT)

; kill existing stack
; entry code sheets and add new ones
; stackda = ien of stack entry
; control = control segment
; batch = batch segment (optional, use "" if not defined)
; document = doc and <tc>1 segments (optional, use "" if not defined)
; descript = 79 character description of event

FORMTIME(TIME)

; return formatted time for control ctl segment

External References

Name	Field # of Occurrence
DD^%DT	REBUILD+21
NOW^%DTC	REBUILD+21
^DIE	UPDSTACK+14
SETCS^GECSSTAA	UPDSTACK+20, UPDSTACK+21, UPDSTACK+22
SETSTAT^GECSSTAA	UPDSTACK+15

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GECS(2100.1 - [#2100.1]	REBUILD+11, UPDSTACK+7, UPDSTACK+10, UPDSTACK+16, UPDSTACK+17!, UPDSTACK+19, UPDSTACK+23

Label References

Name	Line Occurrences
$$FORMTIME	REBUILD+24
UPDSTACK	REBUILD+27, REBUILD+51

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	REBUILD+8~, REBUILD+21
%H	REBUILD+8~
%I	REBUILD+8~
BATCH	UPDSTACK~, UPDSTACK+21
BATNUMB	REBUILD+8~, REBUILD+19*, REBUILD+24, REBUILD+40
CONTROL	UPDSTACK~, UPDSTACK+11, UPDSTACK+12, UPDSTACK+20, UPDSTACK+21
>> DA	UPDSTACK+14*
DATE	REBUILD+8~, REBUILD+21, REBUILD+22, REBUILD+24, UPDSTACK+8~, UPDSTACK+11, UPDSTACK+13
DESCRIPT	REBUILD~, REBUILD+27, REBUILD+51, UPDSTACK~, UPDSTACK+16
>> DIE	UPDSTACK+14*
DOCUMENT	REBUILD+8~, REBUILD+18*, REBUILD+24, REBUILD+48, UPDSTACK~, UPDSTACK+22
>> DR	UPDSTACK+14*
FCPFLAG	REBUILD~, REBUILD+42*, REBUILD+48
FY	REBUILD+8~, REBUILD+22*
GDT	UPDSTACK+8~, UPDSTACK+13*
GECSFMS	REBUILD+10!
GECSFMS("BAT"	REBUILD+40*, REBUILD+51
GECSFMS("CTL"	REBUILD+24*, REBUILD+27, REBUILD+51
GECSFMS("DOC"	REBUILD+46, REBUILD+48, REBUILD+51
H	FORMTIME+1~, FORMTIME+2*, FORMTIME+3
M	FORMTIME+1~, FORMTIME+2*, FORMTIME+3
S	FORMTIME+1~, FORMTIME+2*, FORMTIME+3
SECCODE	REBUILD~, REBUILD+20, REBUILD+24, REBUILD+44, REBUILD+45*, REBUILD+48
SEGMENT	REBUILD+8~, REBUILD+30, REBUILD+31, REBUILD+32, REBUILD+33, REBUILD+34, REBUILD+35, REBUILD+36, REBUILD+37, REBUILD+38* , REBUILD+40, REBUILD+42, REBUILD+45, REBUILD+48
STACK	REBUILD+8~, REBUILD+11*, REBUILD+16, REBUILD+17, REBUILD+18, REBUILD+19
STACKDA	REBUILD~, REBUILD+11, REBUILD+27, REBUILD+51, UPDSTACK~, UPDSTACK+7, UPDSTACK+10, UPDSTACK+14, UPDSTACK+15, UPDSTACK+16 , UPDSTACK+17, UPDSTACK+19, UPDSTACK+20, UPDSTACK+21, UPDSTACK+22, UPDSTACK+23
STATION	REBUILD+8~, REBUILD+17*, REBUILD+24
SYSTEM	REBUILD~, REBUILD+13*, REBUILD+24, REBUILD+48
TIME	UPDSTACK+8~, UPDSTACK+12*, UPDSTACK+13, FORMTIME~, FORMTIME+2
TRANCLAS	REBUILD+8~, REBUILD+23*, REBUILD+24, REBUILD+27
TRANCODE	REBUILD+8~, REBUILD+16, REBUILD+23, REBUILD+24, REBUILD+30, REBUILD+31, REBUILD+32, REBUILD+33, REBUILD+34, REBUILD+35 , REBUILD+36, REBUILD+37, REBUILD+38, REBUILD+48
X	REBUILD+8~, REBUILD+21
Y	REBUILD+8~, REBUILD+21*, REBUILD+24

Customize PDF page

Package: Generic Code Sheet