Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PXBAPI22

Package: PCE Patient Care Encounter

Routine: PXBAPI22


Information

PXBAPI22 ;ISL/DCM - API for Classification check out ; 16 Oct 2006 9:42 PM

Source Information

Source file <PXBAPI22.m>

Entry Points

Name Comments DBIA/ICR reference
ONE(TYPI,DATA,ENCOWNTR,SQUIT) ;Process One Classification
; Input -- TYPI Outpatient Classification Type IEN
; DATA Null or 409.42 IEN^Internal Value^1=n/a^1=unedt
; ENCOWNTR Outpatient Encounter file IEN (optional)
; Output -- SQUIT User entered '^' or timeout
VAL(TYPI,SDCT0,DATA) ;Get Outpatient Classification
REASK
VALQ
STORE(SDCNI,SDCNV,TYPI) ;File Outpatient Classification
; Input -- SDCNI Outpatient Classification IEN
; SDCNV Outpatient Classification Value
; TYPI Classification type 1 - Agent Orange
; 2 - Ionizing Radiation
; 3 - Service Connected
; 4 - SW Asia Conditions
; Output -- PXBDATA array
; Error codes -- PXBDATA("ERR",TYPI)=1 - Bad ptr to 409.41 in TYPI
; 2 - DATA entry not applicable
; 3 - DATA entry uneditable
; 4 - User ^ out of prompt

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "deleted."
  • Line Location: ONE+9
Function Call: WRITE
  • Prompt: !,$P(SDCT0,"^",6)_": "_$$VAL^SDCODD(TYPI,$P(DATA,"^",2))_" <Uneditable>"
  • Line Location: ONE+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SDD(409.42 - [#409.42] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call