Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Caller Graph | Entry Points | Interaction Calls | Global Variables Directly Accessed | Label References | Local Variables | All

Print Page as PDF

Routine: APCPREG

Package: Patient Care Component Data Transmission

Routine: APCPREG

Information

APCPREG ; IHS/TUCSON/LAB - OHPRD-TUCSON/LAB - Check Registration export AUGUST 14, 1992 ; [ 04/03/98 08:39 AM ]

Source Information

Source file <APCPREG.m>

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Patient Care Component Data Transmission	1	APCPDRI2

Entry Points

Name	Comments	DBIA/ICR reference
CHKREG	; Code to check and see if a Registration tape has been ; created for all dates in this PCC tape range
CHKDATE	;
REGINF	;

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"A Patient Registration Tape that includes all of the dates in the PCC",!,"date range has not been created!",!,"You cannot create a PCC tape until a Patient Registration tape has been created." Line Location: REGINF+2
Function Call: WRITE	Prompt: !,"SEE YOUR SUPERVISOR FOR ASSISTANCE",! Line Location: REGINF+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AGTXST - [#9009063]	CHKREG+3, CHKREG+4

Label References

Name	Line Occurrences
CHKDATE	CHKREG+4
REGINF	CHKREG+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCP("QFLG"	CHKREG+3, CHKREG+5
>> APCP("RDFN"	CHKREG+2, CHKREG+4, CHKREG+6!
>> APCP("REG END	" , CHKREG+2, CHKREG+4, CHKREG+6!, CHKDATE+1
>> APCP("REG"	CHKREG+2, CHKREG+4, CHKREG+5, CHKREG+6!, CHKDATE+1
>> APCP("RUN END	" , CHKDATE+1
DUZ(2	CHKREG+3, CHKREG+4
U	CHKREG+4
>> ZTQUEUED	CHKREG+3, REGINF+1

Info | Source | Caller Graph | Entry Points | Interaction Calls | Global Variables Directly Accessed | Label References | Local Variables | All