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

Routine: DGPTFAPI

Information

DGPTFAPI ;BAY/JAT/ADL,HIOFO/FT - Returns data from Patient Treatment (PTF) file ;10/8/14 12:38pm

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
DRG Grouper	1	($$CODEC,$$CSI,$$GETDATE)^ICDEX
Registration	1	EFFDATE^DGPTIC10

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: 11

Package	Total	Caller Graph
Surgery	4	SR95UTL SROAPCA4 SROATCM SROQ30D
Clinical Case Registries	2	RORUPD09 RORX013A
Enterprise Health Management Platform	2	HMPDJ0 HMPDVSIT
Virtual Patient Record	2	VPRDVSIT VPRSDADG
Registration	1	DG PATIENT TREATMENT DATA

Entry Points

Name	Comments	DBIA/ICR reference
RPC(RESULTS,PTFNUMBR)	;DG PATIENT TREATMENT DATA rpc ; input : PTFNUMBR, the Patient Treatment IFN (.001 of file #45) ; RESULTS (passed by reference) ; output: RESULTS(0) = 1 (entry found) OR -1 (error) ; RESULTS(1) = #72: type of disposition^#75: place of disposition (name)^#79: primary ICD code^Coding system Version (pointer to 80.4) ; RESULTS(2) = DX 2^DX 3^...^DX 24 ; RESULTS(3) = POA 1^POA 2^...^POA 25	ICR #3157 Status: Active Usage: Supported

Name

Comments

DBIA/ICR reference

RPC(RESULTS,PTFNUMBR)

;DG PATIENT TREATMENT DATA rpc
; input : PTFNUMBR, the Patient Treatment IFN (.001 of file #45)
; RESULTS (passed by reference)
; output: RESULTS(0) = 1 (entry found) OR -1 (error)
; RESULTS(1) = #72: type of disposition^#75: place of disposition (name)^#79: primary ICD code^Coding system Version (pointer to 80.4)
; RESULTS(2) = DX 2^DX 3^...^DX 24
; RESULTS(3) = POA 1^POA 2^...^POA 25

ICR #3157

Status: Active

Usage: Supported

External References

Name	Field # of Occurrence
EFFDATE^DGPTIC10	RPC+20
$$CODEC^ICDEX	RPC+21, RPC+31
$$CSI^ICDEX	RPC+21
$$GETDATE^ICDEX	RPC+19

Used in RPC

RPC Name	Call Tags
DG PATIENT TREATMENT DATA	RPC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPT - [#45]	RPC+12, RPC+13
^DIC(45.6 - [#45.6]	RPC+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DG70	RPC+7~, RPC+13*, RPC+14, RPC+16, RPC+18, RPC+27
DG71	RPC+7~, RPC+13*, RPC+28
DGDISP	RPC+7~, RPC+14, RPC+15, RPC+24
DGDISTYP	RPC+7~, RPC+16, RPC+17, RPC+24
DGDXE	RPC+7~, RPC+31*, RPC+32
DGDXI	RPC+7~, RPC+30*, RPC+31
DGDXLS	RPC+7~, RPC+18*, RPC+21
DGLOOP	RPC+7~, RPC+27, RPC+28, RPC+29, RPC+30, RPC+32, RPC+35, RPC+36
DGNODE	RPC+7~, RPC+26, RPC+27, RPC+28*, RPC+30
DGPOA	RPC+7~, RPC+13*, RPC+36
DGPTDAT	RPC+7~, RPC+19*
DGPTF	RPC+7~, RPC+8*, RPC+11, RPC+12, RPC+13, RPC+19, RPC+20
DXLS	RPC+7~, RPC+21*, RPC+24
EFFDATE	RPC+7~
ICDVER	RPC+7~, RPC+9, RPC+21, RPC+24
IMPDATE	RPC+7~
PTFNUMBR	RPC~, RPC+8
RESULTS	RPC~, RPC+10!
RESULTS(0	RPC+10, RPC+22
RESULTS(1	RPC+24*
RESULTS(2	RPC+26, RPC+32
RESULTS(3	RPC+34, RPC+36
U	RPC+14, RPC+15, RPC+16, RPC+18, RPC+24, RPC+27, RPC+28, RPC+30, RPC+32, RPC+36

Customize PDF page

Package: Registration