Routine: BQIPTRPU

Package	Total	Call Graph
VA Fileman	3	FILE^DICN FILE^DIE ($$GET1,GETS)^DIQ
Kernel	2	^%ZTER $$NOW^XLFDT
Patient Care Component	1	(,$$RFADD,RHEDIT)^APCDRF
iCare	1	$$DATE^BQIUL1

Entry Points

Name	Comments	DBIA/ICR reference
FILEDATA(ARRAYBQI,ARYAPCD)	; update existing record with data returned from CMET
ERR	;
UP	;
NREC(BQIDFN)	; Create new record in file 9000017
UPDFPM(DATA,DFN,FPMIEN,PARMS)	; EP - BQI UPDATE FAMILY PLANNING METHOD
UPD(DATA,DFN,RPARMS)	;EP - BQI UPDATE REPRODUCTIVE FACTORS
REC
INIT(DATA,DFN)	; EP - BQI REP FAC INIT TRIG
COLLECT(FILE,PARMS,ARRAYBQI,ARRYAPCD)	;

External References

Name	Field # of Occurrence
^%ZTER	ERR+1
^APCDRF	UPD+18, NREC+3
$$RFADD^APCDRF	NREC+3
RHEDIT^APCDRF	FILEDATA+3
$$DATE^BQIUL1	COLLECT+17, COLLECT+18, COLLECT+32
FILE^DICN	NREC+9
FILE^DIE	FILEDATA+4
$$GET1^DIQ	INIT+6
GETS^DIQ	UPD+22
$$NOW^XLFDT	ERR+3

Used in RPC

RPC Name	Call Tags
BQI UPDATE REPRODUCTIVE FACS	UPD
BQI UPDATE FAMILY PLANNING	UPDFPM
BQI REP FAC INIT TRIG	INIT

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNREP - [#9000017]	Classic Fileman Calls, GET1^DIQ, GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNREP - [#9000017]	UPD+20, NREC+7
^BQI(90506.3 - [#90506.3]	UPD+15, UPD+17, UPDFPM+18, UPDFPM+20, COLLECT+13, COLLECT+16, COLLECT+21, COLLECT+22, COLLECT+24, COLLECT+26
^DD("DD"	ERR+3
^DPT - [#2]	NREC+6
^TMP("BQIPTRPU"	UPD+8, INIT+9
^TMP("UPDFPM-BQIPTRPU"	UPDFPM+9

Label References

Name	Line Occurrences
$$FILEDATA	UPD+26, UPDFPM+25
$$NREC	UPD+20
COLLECT	UPD+24, UPDFPM+23
REC	INIT+19, INIT+20, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27, INIT+28
UP	COLLECT+30, COLLECT+31, COLLECT+32, COLLECT+33, COLLECT+34, COLLECT+35

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABLE	INIT+1~, INIT+17, INIT+18, REC
API	UPD+5~, UPD+18*, FILEDATA+3, FILEDATA+4
ARRAYBQI	COLLECT~, FILEDATA~, FILEDATA+4
ARRAYBQI(	UP+1*
ARRYAPCD	COLLECT~
ARRYAPCD(	UP+1*
ARYAPCD	FILEDATA~, FILEDATA+3
>> BMXSEC	UPD+16, UPD+20, UPDFPM+19, NREC+12, NREC+13, COLLECT+10, COLLECT+14, ERR+4
BN	UPDFPM+6~, COLLECT+1~, COLLECT+4, COLLECT+5
BQ	UPDFPM+6~, COLLECT+10*, COLLECT+11
BQEXT	UPDFPM+7~
BQIAPCD	UPD+5~, UPD+24, UPD+26, UPDFPM+7~, UPDFPM+23, UPDFPM+25
BQIDATA	UPD+6~, UPD+24, UPD+26, UPDFPM+7~, UPDFPM+23, UPDFPM+25
BQIDFN	NREC~
BQINT	UPD+5~, UPDFPM+7~
BQINT(	COLLECT+29
BQIRET	FILEDATA+1~, FILEDATA+3*
CHIEN	UPDFPM+6~, COLLECT+1~, COLLECT+21, COLLECT+22, COLLECT+23, COLLECT+24
CLEAR	INIT+1~, INIT+19, INIT+20, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27* , INIT+28*, REC
CLFLAG	INIT+1~, INIT+19, INIT+20, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27* , INIT+28*, REC
CPS	INIT+1~, INIT+6*, INIT+18
D0	NREC+5~
DA	UPD+6~, UPDFPM+7~, NREC+10!
DATA	UPD~, UPD+8, UPD+9, UPD+13, UPD+28, UPD+29, UPDFPM~, UPDFPM+9, UPDFPM+10, UPDFPM+14 , UPDFPM+27, UPDFPM+28, INIT~, INIT+9*, INIT+10, INIT+15, INIT+30, REC, ERR+5
DD	NREC+5~, NREC+9!
DFN	UPD~, UPD+20, UPD+22, UPDFPM~, NREC+3, NREC+6, NREC+7, NREC+8, COLLECT+29, FILEDATA+3 , INIT~, INIT+3*, INIT+6, UP+1
DIC	UPD+6~, UPDFPM+7~, NREC+5~, NREC+8*, NREC+10!
DIC(0	NREC+8*
DINUM	NREC+5~, NREC+8*
DO	NREC+5~, NREC+9!
DR	UPD+6~, UPDFPM+7~, NREC+10!
DT	COLLECT+31, COLLECT+33, COLLECT+34, COLLECT+35
ERRDTM	ERR+2~, ERR+3*, ERR+4
ERROR	UPD+6~, UPDFPM+7~, FILEDATA+2!, FILEDATA+6
ERROR("DIERR"	FILEDATA+6
FIELD	UPDFPM+6~, COLLECT+1~, COLLECT+26, COLLECT+29, COLLECT+31, COLLECT+32, COLLECT+33, COLLECT+34, COLLECT+35*, UP+1
FILE	UPDFPM+6~, UPDFPM+20*, COLLECT~, COLLECT+29, UP+1
FPMIEN	UPDFPM~
HELP	INIT+1~, INIT+19, INIT+20, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27* , INIT+28*, REC
II	UPD+5~, UPD+11, UPD+13, UPD+28, UPD+29, UPDFPM+6~, UPDFPM+12, UPDFPM+14, UPDFPM+27, UPDFPM+28 , INIT+1~, INIT+11, INIT+15, INIT+30, REC, ERR+5
LIST	UPDFPM+6~, COLLECT+1~, COLLECT+4, COLLECT+5, COLLECT+7, COLLECT+8!
NAME	UPDFPM+6~, COLLECT+1~, COLLECT+12*, COLLECT+13, COLLECT+14, COLLECT+17
PARMS	UPDFPM~, COLLECT~, COLLECT+2, COLLECT+3, COLLECT+6!, COLLECT+7, COLLECT+10, COLLECT+11
PARMS(	COLLECT+5
PDATA	UPDFPM+6~, COLLECT+1~, COLLECT+11*, COLLECT+12
PFIEN	UPDFPM+6~, COLLECT+1~, COLLECT+13*, COLLECT+14, COLLECT+16, COLLECT+21, COLLECT+22, COLLECT+24, COLLECT+26
PTYP	UPDFPM+6~, COLLECT+16*, COLLECT+18, COLLECT+19
PTYPE	COLLECT+1~
REQ	INIT+1~, INIT+19, INIT+20, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27* , INIT+28*, REC
RESULT	UPD+6~, UPD+26, UPD+28, UPDFPM+7~, UPDFPM+25, UPDFPM+27
RETVAL	FILEDATA+1~, FILEDATA+5, FILEDATA+6, FILEDATA+7
RPARMS	UPD~, UPD+24, UPDFPM+23
RPFIEN	UPD+5~, UPD+20, UPDFPM+16
RPFILE	UPD+5~, UPD+17*, UPD+24, UPDFPM+23
RPFY	NREC+1~, NREC+3, NREC+4, NREC+6, NREC+7, NREC+11, NREC+12, NREC+13, NREC+14
SOURCE	INIT+1~, INIT+19, INIT+20, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27* , INIT+28*, REC
TYPE	INIT+1~, INIT+19, INIT+20, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27* , INIT+28*, REC
U	UPD+17, UPDFPM+20, NREC+6, NREC+13, COLLECT+16, COLLECT+24, COLLECT+26, FILEDATA+5, FILEDATA+6, REC
UID	UPD+5~, UPD+7, UPD+8, UPDFPM+6~, UPDFPM+8, UPDFPM+9, INIT+1~, INIT+8*, INIT+9
VALUE	UPDFPM+6~, COLLECT+1~, COLLECT+12, COLLECT+17, COLLECT+18, COLLECT+20, COLLECT+21, COLLECT+22, COLLECT+24, COLLECT+29* , COLLECT+30, COLLECT+31, COLLECT+32, COLLECT+33, COLLECT+34, COLLECT+35, INIT+1~, INIT+19, INIT+20, INIT+21 , INIT+22, INIT+23, INIT+24, INIT+25, INIT+26, INIT+27, INIT+28*, REC, UP+1
VFIEN	UPD+5~, UPD+15, UPD+16, UPD+17, UPDFPM+6~, UPDFPM+18, UPDFPM+19, UPDFPM+20, COLLECT+13, COLLECT+16 , COLLECT+21, COLLECT+22, COLLECT+24, COLLECT+26
X	NREC+5~, NREC+8*
Y	NREC+5~, NREC+11, ERR+2~, ERR+3*
>> ZTSK	UPD+7, UPDFPM+8, INIT+8

Marked Items

Name	Field # of Occurrence
$T(^APCDRF	UPD+18, NREC+3

Customize PDF page

Package: iCare

Routine: BQIPTRPU

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items