SDES2SRCHCLNBYSC ;ALB/JAS,JDJ,LAB - SDES2 SEARCH CLIN BY STOP CODE ;JUN 18, 2025
Source file <SDES2SRCHCLNBYSC.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 4 | ($$EXT,$$INACTIVE,$$TELEPHONE)^SDES2UTIL VALSTATIONNUM^SDES2VAL4 VALCONTEXT^SDES2VALCONTEXT ERRLOG^SDESJSON |
| Kernel | 2 | ENCODE^XLFJSON DUZ^XUP |
| PCE Patient Care Encounter | 1 | $$ACTIVPRV^PXAPI |
| VA FileMan | 1 | ($$GET1,GETS)^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SEARCHCLIN(SDRETURN,SDCONTEXT,SDSEARCH) | ;Search for clinics
; The SDCONTEXT array is controlled by the Acheron application and its fields are ; needed for the storage of the required auditing information. |
|
| VALSRCHFLDS(SDERRORS,SDSEARCH) | ; validate incoming search parameters
; Input - SDERRORS = passed in by reference, represents the errors that could be generated when validating the search string ; STATION = Station Number for Division ; STARTING STOP CODE = Stop Code to search against or beginning of a Stop Code range, if ENDING STOP CODE is defined ; ENDING STOP CODE = The last Stop Code in a range to search against |
|
| GETCLINICLIST(CLINLIST,SDSEARCH) | ; pull matching clinics using the first input parameter passed in by the RPC
; Input - ; SDSEARCH = Search array values, including Station Number and/or Stop Code (Stop Code range) ; CLINLIST = passed in by reference; represents the temp global that will be returned as output ; Output - CLINLIST = Temp global with list of clinic names and clinic IENs. |
|
| BUILDRETURN(SDCLINICIEN,SDCLINCNT,CLINLIST,SDDATETIME) | ;Build return array with clinic data
; input - SDCLINICIEN = IEN of clinic in #44 ; CLINLIST = passed by reference, represents the temp global of clinics and associated data that will be returned ; output - CLINLIST = clinic temp global and their associated data to be sent back to the client |
|
| WRONGDIVISION(SDCLINICIEN,STATION) | ;
; Screen out Clinics that don't match passed in Station Number |
|
| WRONGSTOPCODE(SDCLINICIEN,STOPCODESTART,STOPCODEEND) | ;
; Screen out Clinics that don't match the passed in Stop Codes |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | BUILDRETURN+20, BUILDRETURN+23, BUILDRETURN+42, BUILDRETURN+50, BUILDRETURN+51, BUILDRETURN+52, BUILDRETURN+53, BUILDRETURN+56, WRONGDIVISION+3, WRONGDIVISION+4 , WRONGSTOPCODE+3, WRONGSTOPCODE+4 |
| GETS^DIQ | BUILDRETURN+8 |
| $$ACTIVPRV^PXAPI | BUILDRETURN+58, BUILDRETURN+63 |
| $$EXT^SDES2UTIL | BUILDRETURN+31 |
| $$INACTIVE^SDES2UTIL | GETCLINICLIST+16 |
| $$TELEPHONE^SDES2UTIL | BUILDRETURN+30 |
| VALSTATIONNUM^SDES2VAL4 | VALSRCHFLDS+8 |
| VALCONTEXT^SDES2VALCONTEXT | SEARCHCLIN+33 |
| ERRLOG^SDESJSON | VALSRCHFLDS+13, VALSRCHFLDS+14, VALSRCHFLDS+16, VALSRCHFLDS+17, VALSRCHFLDS+18 |
| ENCODE^XLFJSON | SEARCHCLIN+36, SEARCHCLIN+43, SEARCHCLIN+46 |
| DUZ^XUP | SEARCHCLIN+38 |
| RPC Name | Call Tags |
|---|---|
| SDES2 SEARCH CLIN BY STOP CODE | SEARCHCLIN |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(40.7 - [#40.7] | GET1^DIQ |
| ^DG(40.8 - [#40.8] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ, GETS^DIQ |
| 44.03 | GET1^DIQ |
| 44.1 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | VALSRCHFLDS+13, VALSRCHFLDS+14 |
| ^SC - [#44] | GETCLINICLIST+14, BUILDRETURN+41, BUILDRETURN+49 |
| ^TMP("SDES2SRCHCLNBYSC" | SEARCHCLIN+25!, SEARCHCLIN+27, SEARCHCLIN+28 |
| Name | Line Occurrences |
|---|---|
| $$WRONGDIVISION | GETCLINICLIST+15 |
| $$WRONGSTOPCODE | GETCLINICLIST+17 |
| BUILDRETURN | GETCLINICLIST+19 |
| GETCLINICLIST | SEARCHCLIN+45 |
| VALSRCHFLDS | SEARCHCLIN+40 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLINLIST | SEARCHCLIN+26~, SEARCHCLIN+27*, SEARCHCLIN+35, SEARCHCLIN+36!, SEARCHCLIN+42, SEARCHCLIN+43!, SEARCHCLIN+45, SEARCHCLIN+46, SEARCHCLIN+47!, GETCLINICLIST~ , GETCLINICLIST+19, GETCLINICLIST+20, BUILDRETURN~, BUILDRETURN+9, BUILDRETURN+10, BUILDRETURN+11, BUILDRETURN+12, BUILDRETURN+14, BUILDRETURN+15, BUILDRETURN+16 , BUILDRETURN+17, BUILDRETURN+18, BUILDRETURN+19, BUILDRETURN+20, BUILDRETURN+21, BUILDRETURN+22, BUILDRETURN+23, BUILDRETURN+24, BUILDRETURN+25, BUILDRETURN+26 , BUILDRETURN+27, BUILDRETURN+28, BUILDRETURN+29, BUILDRETURN+30, BUILDRETURN+31, BUILDRETURN+32, BUILDRETURN+33, BUILDRETURN+34, BUILDRETURN+35, BUILDRETURN+36 , BUILDRETURN+37, BUILDRETURN+38, BUILDRETURN+44, BUILDRETURN+46, BUILDRETURN+55, BUILDRETURN+56, BUILDRETURN+57, BUILDRETURN+58, BUILDRETURN+60, BUILDRETURN+61 , BUILDRETURN+62, BUILDRETURN+63, BUILDRETURN+65 |
| CLNIEN | GETCLINICLIST+5~, GETCLINICLIST+13*, GETCLINICLIST+14*, GETCLINICLIST+15, GETCLINICLIST+16, GETCLINICLIST+17, GETCLINICLIST+19 |
| DT | SEARCHCLIN+31, VALSRCHFLDS+8 |
| DUZ | SEARCHCLIN+38~ |
| FACNUM | WRONGDIVISION+2~, WRONGDIVISION+4*, WRONGDIVISION+5 |
| SDCLINCNT | GETCLINICLIST+5~, GETCLINICLIST+13*, GETCLINICLIST+18*, GETCLINICLIST+19, GETCLINICLIST+20, BUILDRETURN~, BUILDRETURN+9, BUILDRETURN+10, BUILDRETURN+11, BUILDRETURN+12 , BUILDRETURN+14, BUILDRETURN+15, BUILDRETURN+16, BUILDRETURN+17, BUILDRETURN+18, BUILDRETURN+19, BUILDRETURN+20, BUILDRETURN+21, BUILDRETURN+22, BUILDRETURN+23 , BUILDRETURN+24, BUILDRETURN+25, BUILDRETURN+26, BUILDRETURN+27, BUILDRETURN+28, BUILDRETURN+29, BUILDRETURN+30, BUILDRETURN+31, BUILDRETURN+32, BUILDRETURN+33 , BUILDRETURN+34, BUILDRETURN+35, BUILDRETURN+36, BUILDRETURN+37, BUILDRETURN+38, BUILDRETURN+44, BUILDRETURN+46, BUILDRETURN+55, BUILDRETURN+56, BUILDRETURN+57 , BUILDRETURN+58, BUILDRETURN+60, BUILDRETURN+61, BUILDRETURN+62, BUILDRETURN+63, BUILDRETURN+65 |
| SDCLINICIEN | BUILDRETURN~, BUILDRETURN+8, BUILDRETURN+9, BUILDRETURN+10, BUILDRETURN+11, BUILDRETURN+12, BUILDRETURN+18, BUILDRETURN+19, BUILDRETURN+20, BUILDRETURN+21 , BUILDRETURN+22, BUILDRETURN+23, BUILDRETURN+24, BUILDRETURN+25, BUILDRETURN+26, BUILDRETURN+27, BUILDRETURN+28, BUILDRETURN+29, BUILDRETURN+30, BUILDRETURN+31 , BUILDRETURN+32, BUILDRETURN+33, BUILDRETURN+34, BUILDRETURN+35, BUILDRETURN+36, BUILDRETURN+37, BUILDRETURN+38, BUILDRETURN+41, BUILDRETURN+42, BUILDRETURN+49 , BUILDRETURN+50, BUILDRETURN+53, WRONGDIVISION~, WRONGDIVISION+3, WRONGSTOPCODE~, WRONGSTOPCODE+3 |
| SDCLINPROVIDER | BUILDRETURN+5~, BUILDRETURN+49*, BUILDRETURN+50, BUILDRETURN+53 |
| SDCONTEXT | SEARCHCLIN~, SEARCHCLIN+33 |
| SDCONTEXT("US | ER DUZ" , SEARCHCLIN+38 |
| SDDATA | BUILDRETURN+5~ |
| SDDATA(44 | BUILDRETURN+10, BUILDRETURN+11, BUILDRETURN+12, BUILDRETURN+18, BUILDRETURN+19, BUILDRETURN+20, BUILDRETURN+21, BUILDRETURN+22, BUILDRETURN+23, BUILDRETURN+24 , BUILDRETURN+25, BUILDRETURN+26, BUILDRETURN+27, BUILDRETURN+28, BUILDRETURN+29, BUILDRETURN+30, BUILDRETURN+31, BUILDRETURN+32, BUILDRETURN+33, BUILDRETURN+34 , BUILDRETURN+35, BUILDRETURN+36, BUILDRETURN+37, BUILDRETURN+38 |
| SDDATETIME | GETCLINICLIST+5~, GETCLINICLIST+9*, GETCLINICLIST+16, GETCLINICLIST+19, BUILDRETURN~, BUILDRETURN+58, BUILDRETURN+63 |
| SDDEFAULTPROV | BUILDRETURN+5~, BUILDRETURN+53*, BUILDRETURN+54 |
| SDDIVISION | WRONGDIVISION+2~, WRONGDIVISION+3*, WRONGDIVISION+4 |
| SDERRORS | SEARCHCLIN+30~, SEARCHCLIN+33, SEARCHCLIN+34, SEARCHCLIN+35, SEARCHCLIN+40, SEARCHCLIN+41, SEARCHCLIN+42, VALSRCHFLDS~, VALSRCHFLDS+8, VALSRCHFLDS+9 , VALSRCHFLDS+13, VALSRCHFLDS+14, VALSRCHFLDS+16, VALSRCHFLDS+17, VALSRCHFLDS+18 |
| SDERRORS("ClinicAudit" | SEARCHCLIN+35*, SEARCHCLIN+42* |
| SDFIELDS | BUILDRETURN+5~, BUILDRETURN+7*, BUILDRETURN+8 |
| SDPROVIDERID | BUILDRETURN+5~, BUILDRETURN+50*, BUILDRETURN+51, BUILDRETURN+52, BUILDRETURN+55, BUILDRETURN+56, BUILDRETURN+58, BUILDRETURN+61, BUILDRETURN+63 |
| SDPROVIDERNAME | BUILDRETURN+5~, BUILDRETURN+51*, BUILDRETURN+60 |
| SDPROVIDERSECID | BUILDRETURN+5~, BUILDRETURN+52*, BUILDRETURN+57, BUILDRETURN+62 |
| SDPRVCNT | BUILDRETURN+5~, BUILDRETURN+48*, BUILDRETURN+59*, BUILDRETURN+60, BUILDRETURN+61, BUILDRETURN+62, BUILDRETURN+63 |
| SDRETURN | SEARCHCLIN~, SEARCHCLIN+28*, SEARCHCLIN+36, SEARCHCLIN+43, SEARCHCLIN+46 |
| SDSEARCH | SEARCHCLIN~, SEARCHCLIN+40, SEARCHCLIN+45, VALSRCHFLDS~, GETCLINICLIST~ |
| SDSEARCH("END | ING STOP CODE" , VALSRCHFLDS+12, GETCLINICLIST+7 |
| SDSEARCH("SDDATETIME" | SEARCHCLIN+31*, SEARCHCLIN+36!, SEARCHCLIN+43!, SEARCHCLIN+47!, GETCLINICLIST+9 |
| SDSEARCH("STA | RTING STOP CODE" , VALSRCHFLDS+11, GETCLINICLIST+6 |
| SDSEARCH("STATION" | VALSRCHFLDS+7, GETCLINICLIST+8 |
| SDSICNT | BUILDRETURN+6~, BUILDRETURN+40*, BUILDRETURN+43*, BUILDRETURN+44 |
| SDSPECINIEN | BUILDRETURN+6~, BUILDRETURN+41*, BUILDRETURN+42 |
| SDSPECINSTRUCT | BUILDRETURN+6~, BUILDRETURN+42*, BUILDRETURN+44 |
| SDSTATION | VALSRCHFLDS+5~, VALSRCHFLDS+7*, VALSRCHFLDS+8, VALSRCHFLDS+17, GETCLINICLIST+5~, GETCLINICLIST+8*, GETCLINICLIST+15 |
| STATION | WRONGDIVISION~, WRONGDIVISION+5 |
| STOPCDEND | VALSRCHFLDS+5~, VALSRCHFLDS+12*, VALSRCHFLDS+14, VALSRCHFLDS+16, VALSRCHFLDS+18 |
| STOPCDIEN | WRONGSTOPCODE+2~, WRONGSTOPCODE+3*, WRONGSTOPCODE+4 |
| STOPCDSTART | VALSRCHFLDS+5~, VALSRCHFLDS+11*, VALSRCHFLDS+13, VALSRCHFLDS+16, VALSRCHFLDS+17, VALSRCHFLDS+18 |
| STOPCODE | WRONGSTOPCODE+2~, WRONGSTOPCODE+4*, WRONGSTOPCODE+5 |
| STOPCODEEND | GETCLINICLIST+5~, GETCLINICLIST+7*, GETCLINICLIST+11*, GETCLINICLIST+17, WRONGSTOPCODE~, WRONGSTOPCODE+5 |
| STOPCODESTART | GETCLINICLIST+5~, GETCLINICLIST+6*, GETCLINICLIST+11, GETCLINICLIST+17, WRONGSTOPCODE~, WRONGSTOPCODE+5 |