| 1 | DATA work.deployfiles; |
| 2 | |
| 3 | |
| 4 | LENGTH app_name type dir_uri app_uri dir_name file_uri file_name owner |
| 5 | trans_uri resp_uri job_name $ 50 id $ 17 dir_path $ 255; |
| 6 | call missing(of _character_); |
| 7 | |
| 8 | |
| 9 | keep app_name dir_name dir_path file_name owner job_name; |
| 10 | |
| 11 | |
| 12 | |
| 13 | dir_obj="omsobj:Directory?Directory[ @code_sas_json/downside_frequency_test.json contains '.'][DeployedComponents/ServerContext]"; |
| 14 | |
| 15 | dir_rc=metadata_resolve(dir_obj,type,id); |
| 16 | |
| 17 | |
| 18 | IF dir_rc > 0 THEN DO n=1 to dir_rc; |
| 19 | |
| 20 | rc=metadata_getnobj(dir_obj,n,dir_uri); |
| 21 | rc=metadata_getnasn(dir_uri,"DeployedComponents",1,app_uri); |
| 22 | rc=metadata_getattr(app_uri,"Name",app_name); |
| 23 | rc=metadata_getattr(dir_uri,"Name",dir_name); |
| 24 | rc=metadata_getattr(dir_uri,"DirectoryName",dir_path); |
| 25 | |
| 26 | file_rc=metadata_getnasn(dir_uri,"Files",1,file_uri); |
| 27 | |
| 28 | |
| 29 | IF file_rc > 0 THEN DO m=1 to file_rc; |
| 30 | |
| 31 | rc=metadata_getnasn(dir_uri,"Files",m,file_uri); |
| 32 | rc=metadata_getattr(file_uri,"FileName",file_name); |
| 33 | trans_rc=metadata_getnasn(file_uri,"AssociatedTransformation",1,trans_uri); |
| 34 | |
| 35 | |
| 36 | |
| 37 | IF trans_rc > 0 THEN DO o=1 to trans_rc; |
| 38 | |
| 39 | rc=metadata_getnasn(file_uri,"AssociatedTransformation",o,trans_uri); |
| 40 | rc=metadata_getattr(trans_uri,"Name",job_name); |
| 41 | rc=metadata_getnasn(trans_uri,"ResponsibleParties",1,resp_uri); |
| 42 | rc=metadata_getattr(resp_uri,"Name",owner); |
| 43 | OUTPUT; |
| 44 | END; |
| 45 | ELSE put "INFO: No Associations Found"; |
| 46 | END; |
| 47 | ELSE put "INFO: No Associated Files Found"; |
| 48 | |
| 49 | END; |
| 50 | ELSE put "INFO: No Deployment Directories Found"; |
| 51 | RUN; |